habe mir ein Tool zur Erleichterung der Arbeit gebastelt.
In der Excel Tabell will ich per Druck button Spalten ausblenden, leider weis ich gerade nicht weiter, weil obwohl nicht programmiert werden Spalten ausgeblendet also nicht angezeigt obwohl im Code nicht angegeben. zb. wird Spalte "P " ausgeblendet obwohl nicht im Makro enthalten, will ja nur die angegebenen Spalten ausblenden..per Button Druck1 weiß nicht warum oder finde den Fehler nicht vielleicht kann mir jemand den Fehler zeigen :-) Bsp.
Sub Makro4()
' Makro4
Columns("A").Select
Selection.EntireColumn.Hidden = True
Columns("B").Select
Selection.EntireColumn.Hidden = True
Columns("C").Select
Selection.EntireColumn.Hidden = True
Columns("D").Select
Selection.EntireColumn.Hidden = True
Columns("F").Select
Selection.EntireColumn.Hidden = True
Columns("G").Select
Selection.EntireColumn.Hidden = True
Columns("L").Select
Selection.EntireColumn.Hidden = True
Columns("M").Select
Selection.EntireColumn.Hidden = True
Columns("N").Select
Selection.EntireColumn.Hidden = True
Columns("O").Select
Selection.EntireColumn.Hidden = True
Columns("Q").Select
Selection.EntireColumn.Hidden = True
Columns("R").Select
Selection.EntireColumn.Hidden = True
Columns("W:DR").Select
Selection.EntireColumn.Hidden = True
End Sub