Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Scoprire righe su foglio1 con pulsante su userform [RISOLTA - CHIUSA]

Ultimo Aggiornamento: 30/12/2023 12:10
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

Re:
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

Re:
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

Re:
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

Re:
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😂

Vota:
Amministra Discussione: | Riapri | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 10:13. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com