Clever-Excel-Forum

Clever-Excel-Forum > Office-Anwendungen > Excel > Schleife Endet nicht (.Find Method)
Normale Version: Schleife Endet nicht (.Find Method)
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2

snb

24.04.2024, 19:58
Code:
Sub M_snb()
  With UsedRange.Columns(6)
    .AutoFilter 1, "sz"
    .Offset(1, 1).Resize(.Cells.Count - 1) = "sz"
    .AutoFilter
  End With
End Sub

>1 Mal Suchen = Filtern

Gast 123

24.04.2024, 20:38
Hallo

Toll, eiskalt von einem aufmerksamen Kollegen erwischt!!

@EarlFred   Danke, du warst sehr aufmerksam, ich baute mir wieder mal in der AW einen Flüchtigkeitsfehler ein.

Entweder vor Adr1 -If Not Find Is Nothing- , oder nach Set Find -If Find is Nothing- mit MsgBox und Exit Sub enden.
Passiert mir selten das ich das bei mir vergesse, aber hier war ich einfach zu eilig im Antwort geben.

mfg Gast 123
Seiten: 1 2
Clever-Excel-Forum > Office-Anwendungen > Excel > Schleife Endet nicht (.Find Method)