Hallo Michael,
Post by Michael SchüllerHallo zusammen,
kann mir jemand den grundsätzlichen Unterschied zwischen Worksheet und Sheet erklären, bzw. was für einen Sinn diese
Unterscheidung macht?
schau dir in der OH die Worksheets- und Sheets-Auflistung an.
Die Sheets-Auflistung enthält alle Blatttypen der Arbeitsmappe, also auch
Charts, Dialog- und Makro-Blätter.
Die Worksheets-Auflistung, wie der Name schon sagt nur die Worksheets.
Angenommen, deine Mappe hat Tabellen-, Diagramm-, Makro- und Dialogblätter.
Um nur alle Tabellenblätter anzusprechen verwende folgende Prozedur:
Sub AlleWorksheets()
Dim wks As Worksheet
For Each wks In ThisWorkbook.Worksheets
Debug.Print wks.Name
Next wks
End Sub
Hingegen liefert folgende Version einen Fehler:
Sub AlleWorksheets1()
Dim wks As Worksheet
' Fehler, wenn ein Blatt kein Worksheet ist
For Each wks In ThisWorkbook.Sheets
Debug.Print wks.Name
Next wks
End Sub
Um alle Blätter, egal welchen Typs anzusprechen, verwende die Sheets-Auflistung:
Sub AlleBlätter()
Dim sh As Object
For Each sh In ThisWorkbook.Sheets
Debug.Print sh.Name
Next sh
End Sub
--
Mit freundlichen Grüssen
Melanie Breden
- Microsoft MVP für Excel -
http://excel.codebooks.de (Das Excel-VBA Codebook)
#Excel-Auftragsprogrammierung#