Autofilter Criteria nicht gefunden
25.08.2007 08:13:46
Larissa
Ich bin auf der Suche nach einer kleinen Zusatzfunktion für meinen Autofilter, und zwar, wenn die Rechnungsnummer in Spalte A nicht enthalten ist, dann soll nicht gefiltert werden:
Sub Filter()
Dim rgnr As String
rgnr = ActiveCell
Sheets("Rechnungen").Select
Selection.AutoFilter Field:=1, Criteria1:=rgnr
End Sub
Ich bedanke mich schon mal für Eure Hilfe,
lieben Gruß,
Larissa
