Macro per scoprire fogli

[Sandro]

Ho scritto la seguente routine per scoprire i fogli nascosti in una cartella
di lavoro:

Public Sub Scopri()

Dim foglio As Worksheet

For Each foglio In ActiveWorkbook
foglio.Visible = True
Next

End Sub

Mi viene pero', quando lancio l'esecuzione, segnalato un errore:
proprieta' o metodo non supportati dall'oggetto.

Dove sbaglio????

--
Ciao e grazie a tutti
Sandro

[Norman Jones]

Post by Sandro
Ho scritto la seguente routine per scoprire i fogli nascosti in una cartella
Public Sub Scopri()
Dim foglio As Worksheet
For Each foglio In ActiveWorkbook
foglio.Visible = True
Next
End Sub
proprieta' o metodo non supportati dall'oggetto.
Dove sbaglio????
--
Ciao e grazie a tutti
Sandro

Ciao Sandro,

Post by Sandro
For Each foglio In ActiveWorkbook

Avrebbe dovuto essere:

For Each foglio In ActiveWorkbook.Worksheets

---
Regards,
Norman

[Sandro]

Post by Norman Jones

Post by Sandro
Ho scritto la seguente routine per scoprire i fogli nascosti in una cartella
Public Sub Scopri()
Dim foglio As Worksheet
For Each foglio In ActiveWorkbook
foglio.Visible = True
Next
End Sub
proprieta' o metodo non supportati dall'oggetto.
Dove sbaglio????
For Each foglio In ActiveWorkbook

For Each foglio In ActiveWorkbook.Worksheets

Hai ragione, infatti l'insieme dei fogli di lavoro e' "Worksheets"!!!!!

Grazie per la dritta!

PS:Una curiosita'....ho visto che il tuo nick e' "inglese", come mai sei su
un NG italiano?.... :-)))

Ciao e grazie milleeeeee

[Norman Jones]

Post by Sandro
PS:Una curiosita'....ho visto che il tuo nick e' "inglese", come mai sei su
un NG italiano?.... :-)))
Ciao e grazie milleeeeee

Ciao Sandro,

Amo Excel e parlo l'italiano - anche se lo parlo molto male!

In ogni modo, tu mi troverai abbastanza spesso anche nei gruppi inglesi


---
Regards,
Norman

[Sandro]

Post by Norman Jones

Post by Sandro
PS:Una curiosita'....ho visto che il tuo nick e' "inglese", come mai sei su
un NG italiano?.... :-)))

Amo Excel e parlo l'italiano - anche se lo parlo molto male!

Io ti capisco *benissimo*!! :-)))

Grazie per la tempestiva risposta, ne approfitto....:

c'e' una domanda posta da "pippo" il 21/01, avente per oggetto "Problema
stampa" che interessa anche me, ma ancora non c'e' risposta.

Se sai qualcosa puoi rispondere in quel thread???

Ciao e grazie milllleeeee

[Norman Jones]

Post by Sandro
c'e' una domanda posta da "pippo" il 21/01, avente per oggetto "Problema
stampa" che interessa anche me, ma ancora non c'e' risposta.
Se sai qualcosa puoi rispondere in quel thread???
Ciao e grazie milllleeeee

Ciao Sandro

Ho letto la domanda da Pippo ma ... non ho una soluzione!

---
Regards,
Norman