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 alle