|
29/12/2023 18:22 | |
In un modulo ho inserito una macro per nascondere le righe del Foglio1 popolate con dati.
Nello stesso modulo ho inserito questo codice:
Sub ScopriRighe ()
Cells.EntireRow.Hidden= False
End Sub
Se io lancio la macro dal Foglio1 scopro tutte le righe, se lancio la macro da un pulsante posto su una userfom non funziona.
Mi potete spigare il perchè
Grazie
rex88 |
|
| | Post: 3.172 | Registrato il: 10/10/2013
| Città: VICENZA | Età: 69 | Utente Master | 365 | | OFFLINE |
|
29/12/2023 19:19 | |
ciao
non hai specificato nella macro che foglio deve modificare
la SUB funziona nel foglio da dove tu la lanci
se la metti un un form deve specificare in che foglio deve attivarsi
Sub ScopriRighe()
ActiveSheet.Cells.EntireRow.Hidden = False
End Sub
[Modificato da federico460 29/12/2023 19:40] |
|
29/12/2023 22:38 | |
Ho modificato il codice in questo modo, ma non funziona
Sub ScopriRighe ()
Dim sh As Worksheet
Set sh1 = Worksheets("Foglio1")
ActiveSheet.Cells.EntireRow.Hidden= False
End Sub |
| | Post: 1.653 | Registrato il: 27/06/2011
| Utente Veteran | excel 2007 | | OFFLINE |
|
29/12/2023 22:58 | |
rex88 (nTdQ231201), 29/12/2023 22:38:
Sub ScopriRighe ()
Dim sh As Worksheet
Set sh1 = Worksheets("Foglio1")
ActiveSheet.Cells.EntireRow.Hidden= False
End Sub
ti sembra lo stesso codice che ti ha postato Federico al post #2?
ahi ahi ahi....
copiare, incollare... senza capire.... è una cosa da NON fare....
studiati l'istruzione With ... End With
Stretta la foglia, larga la via, dite la vostra che ho detto la mia.
Excel 2007 forse anche 2013 ... 2021 ... 365 e future... |
|
29/12/2023 23:04 | |
Non ho affatto copiato.
Sono partito dal mio codice e quello che ho aggiunto non l'ho copiato da altra parte.
Non è corretto ma sto vedendo come rimediare.
|
| | Post: 1.654 | Registrato il: 27/06/2011
| Utente Veteran | excel 2007 | | OFFLINE |
|
29/12/2023 23:14 | |
rex88 (nTdQ231201), 29/12/2023 23:04:
Non ho affatto copiato
Caro rex88,
tu menti! Sapendo di mentina... 🤣
AAA DDD DDD III OOO
Stretta la foglia, larga la via, dite la vostra che ho detto la mia.
Excel 2007 forse anche 2013 ... 2021 ... 365 e future... |
|
29/12/2023 23:16 | |
Ricominciamo a trattarmi a pesci in faccia?
Ho diritto ad essere considerato un essere umano? [Modificato da rex88 29/12/2023 23:18] |
| | Post: 3.669 | Registrato il: 06/04/2013
| Utente Master | 2010 | | OFFLINE |
|
30/12/2023 09:31 | |
rex88 (nTdQ231201), 29/12/2023 22:38:
Ho modificato il codice in questo modo, ma non funziona
Sub ScopriRighe ()
Dim sh As Worksheet
Set sh1 = Worksheets("Foglio1")
ActiveSheet.Cells.EntireRow.Hidden= False
End Sub
Ciao
ci sono delle imprecisioni Rex:
- dichiari sh e poi valorizzi sh1
- se la uForm non è nel foglio1, l'ActiveSheet ovviamente non è il Foglio1
d'altra parte che senso avrebbe dichiarare una variabile e non utilizzarla?
quindi:
Sub ScopriRighe()
Dim Sh1 As Worksheet
Set Sh1 = Worksheets("Foglio1")
Sh1.Cells.EntireRow.Hidden = False
End Sub
Saluti
Domenico
Win 10 - Excel 2016 |
|
30/12/2023 10:31 | |
Ciao.
ho corretto il mio codice.
Grazie.
Un saluto.
rex88 |
| | Post: 3.178 | Registrato il: 10/10/2013
| Città: VICENZA | Età: 69 | Utente Master | 365 | | OFFLINE |
|
30/12/2023 11:21 | |
ciao
io non capirò mai i vbaisti
se con una stringa me la cavo perchè devo complicarmi la vita😀
perchè ho messo ActiveSheet....
semplice
ho pensato che il form sia sul foglio dove devo vedere le righe nascoste
altrimenti a che mi serve mah!
vbaisti del piffero meglio le mie formule
🤣
|
| | Post: 5.021 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | ONLINE |
|
30/12/2023 11:42 | |
federico460, 30/12/2023 11:21:
ciao
vbaisti del piffero meglio le mie formule
🤣
Hai presente la favola di Esopo de "La volpe e l'uva"? 😂
Alfredo |
|
30/12/2023 12:02 | |
Una domanda non attinente alla discussione.
Volevo chiede a dodo47 se la compilazione del file.pdf editabile funziona. |
| | Post: 3.179 | Registrato il: 10/10/2013
| Città: VICENZA | Età: 69 | Utente Master | 365 | | OFFLINE |
|
30/12/2023 12:10 | |
ciao
Al
Hai presente la favola di Esopo de "La volpe e l'uva"? 😂
io in questo caso l'uva l'avevo già mangiata alzando una mano
voi avete preso il carrello sollevatore.
se una cosa è semplice perchè complicarla😂
|
|
|