Supportnet / Forum / Tabellenkalkulation
Excel UserForm
Frage
Hallo Excelfreunde,
nach dem Drucken funktioniert die Filterung nicht mehr.
Woran kann das liegen?
Gruß
fedjo
Dim Zelle As Range
Application.ScreenUpdating = False
Cells.Rows.EntireRow.Hidden = False
For Each Zelle In Range("H9:H" & Range("H65536").End(xlUp).Row)
If Zelle.Text <> ComboBox6.Text Then
Zelle.Rows.EntireRow.Hidden = True
End If
Next
Antwort 1 von M.O.
Hallo,
wenn das dein gesamter Code ist, musst du am Ende
ergänzen..
Gruß
M.O.
wenn das dein gesamter Code ist, musst du am Ende
Application.ScreenUpdating = True
ergänzen..
Gruß
M.O.
Antwort 2 von fedjo
Hallo M.O.,
danke für die Hilfe, ist natürlich nicht der ganze Code.
Um es zu verstehen habe ich eine Mustertabelle erstellt.
Vor dem Drucken ist alles O.K. danach dauert das Filtern unter "Suchen" sehr lange. Woran kann das liegen?
Gruß
fedjo
Mustertabelle
danke für die Hilfe, ist natürlich nicht der ganze Code.
Um es zu verstehen habe ich eine Mustertabelle erstellt.
Vor dem Drucken ist alles O.K. danach dauert das Filtern unter "Suchen" sehr lange. Woran kann das liegen?
Gruß
fedjo
Mustertabelle