Prozedur bei Worksheet_Activate tut nicht
14.09.2007 10:10:34
Bruno
Was für Gründe kann es haben, dass Worksheet_Activate-Prozeduren nicht ausgeführt werden...? Normalerweise funktioniert - z.B. diese Prozedur - ohne Probleme, nur zwischendurch scheint Excel ein 'Hänger' zu haben und macht gar nix!
Beispiel für einen Autofilter:
Private Sub Worksheet_Activate()
Application.ScreenUpdating = False
If Range("c5") = 0 Then
With ActiveSheet
If .FilterMode = True Then
.ShowAllData
End If
End With
Else: Selection.AutoFilter Field:=7, Criteria1:=Range("c5")
End If
Application.ScreenUpdating = True
End Sub
Vielen Dank für Tipps.
Gruss
Bruno