7: Referenciando o objeto Worksheet
A coleção (collection) Worksheets contém todos os objetos planilhas (sheet) do workbook.
Utilizando um simples loop For Each, podemos circular através da coleção (collection).
Por exemplo, o código a seguir popula um list box com os nomes de todas as planilhas (Sheets) ativas em um workbook:
Private Sub UserForm_Activate()
'Popular o list box com os nomes das sheets
'ativas no workbook.
Dim ws As Worksheet
For Each ws In Worksheets
ws.Select
ListBox1.AddItem ws.Name
Next ws
End Sub
As coleções (collections) Sheets e Worksheets possuem inicialmente objetos Worksheet, mas as coleções (collections) Sheets contém worksheets e chart sheets (planlhas gráficos).
Veja também:
Tudo em VBA
VBA Excel
VBA Access
A&A - WORK, DON´T PLAY!
http://al-bernardes.sites.uol.com.br/
bernardess@gmail.com