Hallo zusammen,
hab einen Fehler im Code:
Dim Pfad As String, Name As String
Pfad = "D:\" ' Pfad für Deine Bedürfnisse Anpassen
Name = Sheets("Lief.vergleich").Cells(7, 2) ' Speichert den Suchbegriff aus Reiter Lief.vergleich Zelle B7
Sheets("Basistabelle").Select
ActiveWindow.LargeScroll ToRight:=-2
Selection.AutoFilter Field:=7, Criteria1:="Sheets(Lief.vergleich).Cells(7, 2)", Operator:=xlAnd
Aber jetzt filtert er alle Sheets(Lief.vergleich).Cells(7, 2), heraus, dabei sollte er alle Zeilen anzeigen, die nicht den Namen aus B7 enthalten.
Wie kann ich das erreichen? Hab nach dem Code schon mal gefragt. Komme alleine wirklich nicht weiter.
Vielen vielen Dank im Voraus.
VG Andreas