Excel Makro Autofilter alles außer bestimmten Eintrag auswählen

Um in Excel ein Makro zu schreiben, das im Autofilter alles auswählt, außer eines bestimmten Eintrags, kannst du den folgenden VBA-Code verwenden. Dieser Code geht davon aus, dass du bereits einen Autofilter auf deine Daten angewendet hast.

1. Öffne Excel und drücke `ALT + F11`, um den VBA-Editor zu öffnen.
2. Klicke auf `Einfügen` und wähle `Modul`, um ein neues Modul zu erstellen.
3. Kopiere den folgenden Code in das Modul:

```vba
Sub FilterExceptOneEntry()
Dim ws As Worksheet
Dim filterRange As Range
Dim criteria As String

' Setze das Arbeitsblatt und den Filterbereich
Set ws = ThisWorkbook.Sheets("DeinBlattName") ' Ersetze "DeinBlattName" mit dem Namen deines Arbeitsblatts
Set filterRange = ws.Range("A1").CurrentRegion ' Ersetze "A1" mit der Zelle, die den Autofilter enthält

' Setze das Kriterium, das ausgeschlossen werden soll
criteria = "EintragZumAusschließen" ' Ersetze "EintragZumAusschließen" mit dem Eintrag, den du ausschließen möchtest

' Wende den Autofilter an
With filterRange
.AutoFilter Field:=1, Criteria1:="<> " & criteria ' Ersetze "1" mit der entsprechenden Spaltennummer
End With
End Sub
```

4. Ersetze `DeinBlattName` mit dem Namen deines Arbeitsblatts und `EintragZumAusschließen` mit dem spezifischen Eintrag, den du ausschließen möchtest. Achte darauf, die Spaltennummer im `Field`-Parameter entsprechend anzupassen.
5. Schließe den VBA-Editor und gehe zurück zu Excel.
6. Drücke `ALT + F8`, wähle `FilterExceptOneEntry` aus der Liste und klicke auf `Ausführen`.

Das Makro filtert nun alle Einträge in der angegebenen Spalte, außer dem, den du ausgeschlossen hast.