Spalten und Zeilenbezeichnung ausblenden
04.07.2017 09:51:15
Saerdna
habe ein winziges Problem. ;-)
Nachfolder Code soll in meinem Workbook in allen Arbeitsblättern die Spalten und Zeilenbezeichnung mit ActiveWindow.DisplayHeadings = Fals ausblenden.
Eingefügt in "Diese Arbeitsmappe"
Private Sub Workbook_Open()
Dim Blatt As Worksheet
For Each Blatt In ActiveWorkbook.Sheets
ActiveWindow.DisplayHeadings = False
Next Blatt
End Sub
Code funktioniert aber leider nur beim ersten Arbeitsblatt.
Was mache ich falsch?
Viele Grüße
Andreas