Trabalho com o Excel à mais de uma década. Mesmo assim continuo a descobrir novas situações.
Como esta que aconteceu no ultimo curso.
Em Excel 2007.
Podemos ocultar várias folhas de uma só vez!
Mas só podemos mostrar (desocultar :-s), uma de cada vez… :-)
Assim o diz a própria Microsoft: http://office.microsoft.com/en-us/excel/HP012170331033.aspx
“NOTE You can unhide only one worksheet at a time.”
Solução:
Utilize a seguinte macro para fazer exactamente o processo contrário:
Sub MostarTodasAsFolhasOcultas()
Dim folha As Worksheet
Application.ScreenUpdating = False
For Each folha In ActiveWorkbook.Worksheets
folha.Visible = xlSheetVisible
Next folha
Sheets(1).Select
Application.ScreenUpdating = True
End Sub
;-)
Qualquer questão não hesitem em comentar.
EXCEL..ente Fim de Semana!!
Por: Paulo Costa
pcosta71@gmail.com