Kann mir jemand ein Makro schreiben, mit dem ich die Spalten H-R und U-X aus Tabellen entfernen kann.
Besten Dank
Gruss Martin
Sub Aus()
Columns("E:H").EntireColumn.Hidden = True
End Sub
Sub Ein()
Columns("E:H").EntireColumn.Hidden = False
End Sub