we are not amused
Wirklich erstaunlich. In einer Excel sind mehrere Tabellenblätter ausgeblendet:
Die Codezeile:
ActiveWorkbook.Worksheets(„Tabelle4“).Activate
selektiert das letzte Blatt und liefert keinen Fehler.
Auch folgender Sachverhalt ist amüsant und erstaunlich:
Der Teilnehmer der VBA-Schulung wollte die Anzahl der Zeilen eines Bereiches mit:
MsgBox ActiveSheet.Range(„A1“).CurrentRegion.Rows.Count
ermitteln. Statt dessen vertippte er sich und schrieb:
MsgBox ActiveSheet.Range(„A1“).CurrentRegion.Count
CurrentRegion.Count liefert die Anzahl der Zellen des Bereichs. Ich hätte etwas anderes erwartet: