VBA blendet mehr aus als es soll
01.03.2023 13:40:51
Patrick
ich habe mir ein ganz simples Makro "geschrieben" um in meiner Tabelle eine bestimmte Ansicht zu erzeugen.
Sub P_AP23_View()
ActiveSheet.Outline.ShowLevels RowLevels:=0, ColumnLevels:=2
Columns("C:C").Select
Selection.EntireColumn.Hidden = True
Columns("E:G").Select
Selection.EntireColumn.Hidden = True
Columns("J:J").Select
Selection.EntireColumn.Hidden = True
Columns("M:N").Select
Selection.EntireColumn.Hidden = True
Columns("AB:BG").Select
Selection.EntireColumn.Hidden = True
Columns("BV:CG").Select
Selection.EntireColumn.Hidden = True
Columns("CU:DT").Select
Selection.EntireColumn.Hidden = True
Columns("EU:IV").Select
Selection.EntireColumn.Hidden = True
Range("B6").Select
ActiveCell.Offset(1, 0).Range("A1").Select
End SubLeider macht es aber nicht das was es soll..
Wenn ich das Makro in Einzelschritten ausführe fällt mir folgendes auf:
Anstatt J:J auszublenden, blendet er J:M aus
Daraufhin blendet er anstatt M:N komplett N:T aus
dann blendet er anstatt CU:DT einfach den Rest also CH:FH aus
dann blendet er anstatt EU:IV einfach FI:Unendlich aus...
Habe dann das Makro einfach mal aufgezeichnet in der richtigen Reihenfolge... Er macht dann die selben Fehler...
WORAN KANN DAS LIEGEN?
Ich bin echt am verzweifeln...