Hallo zusammen.
ich habe heute folgendes Anliegen.
Mittels Makroaufzeichnung habe ich ein Makro (s. anhängend) erstellt, welches Spalten ausblendet, um eine Tabelle zu verbergen.
Leider werden Buttons, die Sortierungen der Tabelle vornehmen, nicht mit ausgeblendet.
Meine Frage ist: Gibt es eine Möglichkeit innerhalb des Makros oder mittels eines eigenen Makros die Buttons auch auszublenden?
Danke im voraus und Gruß Flodnug
Sub OSR_Einsätze_Gesamt()
'
' OSR_Einsätze_Gesamt Makro
'
'
Range("L5:M44").Select
ActiveWorkbook.Worksheets("Gesamt").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Gesamt").Sort.SortFields.Add Key:=Range("M5:M44") _
, SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("Gesamt").Sort.SortFields.Add Key:=Range("L5:L44") _
, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Gesamt").Sort
.SetRange Range("L4:M44")
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
Range("B5").Select
End Sub