mit nachfolgendem Programmcode werden die Namen aller Tabellenblätter erkannt und können daraufhin ausgewertet werden. In einer Arbeitsmappe ist neben 3 Tabellenblättern auch ein Diagrammblatt vorhanden; dieses wird jedoch nicht erkannt.
Dim sh As Worksheet
For Each sh In Worksheets
If sh.Name = "Diagramm1" Then
varDiagramm = 1
End If
Next
Wie müsste der Programmcode abgeändert werden um auch Diagrammblätter zu erkennen
mfg
Reiner