Ich möchte ab Spalte "K" alle Spalten ausblenden.
Makro meckert. Sheets("Gesperrte Ware").Columns("K:XFD").EntireColumn.Hidden = True
Gehe ich bis Columns("K:XFB") gehe dan funktioniert es.
Gruß Heinz
Sub b()
Sheets("Gesperrte Ware").Range("K1:XFD1").EntireColumn.Hidden = True
End Sub
Sub b()
Sheets("Gesperrte Ware").Range("K1:XFD1").EntireColumn.Hidden = True
End Sub
Sub b()
Sheets("Gesperrte Ware").Unprotect "" 'eventuell PW
Sheets("Gesperrte Ware").Range("K1:XFD1").EntireColumn.Hidden = True
Sheets("Gesperrte Ware").Protect "" 'eventuell PW
End Sub
starke Vermutung von mir, dein Blattschutz ist aktiv?
Recht herzlichen Dank,an alleDie erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen