Code für 2007 verbessern
Lorenz
folgender Code dauert in Excel2007 seeeeehr lange (im 2003 aber ruck zuck)
Sub SpaltenAusblenden()
Dim i As Integer
Application.ScreenUpdating = False
Cells.EntireColumn.Hidden = False
Range("DA197").Activate
For i = 1 To 104
Columns(i).Hidden = True
Next i
For i = 133 To 16384
Columns(i).Hidden = True
Next i
Application.ScreenUpdating = True
End Sub
Woran kann das liegen? Soll er für`s 2007er anders lauten (wegen der mehreren Spaltenzahl) oder was kann schuld sein?
Danke vorab & Gruß
Lorenz
Anzeige