Supportnet Computer
Planet of Tech

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

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