Office: VBA Autofilter - alle Werte auswählen außer einem bestimmten Wert

Hallo zusammen,

mal wieder Versuche ein Problem in Excel zu lösen - diesmal in VBA.
Naja , ich versuche mit Hilfe von VBA einen Auto-Filter zu verwenden.

Hat einer von Euch eine Idee welchen Code ich brauche um im Autofilter einen bestimmten Wert nicht auszuwählen?
Der Makro Recorder macht leider genau das Gegenteil und zeigt mir alle Werte an die gefiltert werden.

Meine Absicht ist es einen Wert, der immer gleich bleibt, nicht auszuwählen und alle anderen Werte auszuwählen und dann diese zu löschen.

In dem folgenden Code soll der Wert a immer deselektiert werden und alle andere Werte ausgewählt.

Hat einer von Euch eine Idee wie man das machen kann?


Sub Makro4()
ActiveSheet.Range("$A$1:$E$6").AutoFilter Field:=1, Criteria1:=Array("b", _
"c", "v"), Operator:=xlFilterValues
Rows("3:3").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Delete Shift:=xlUp
End Sub


P.S. Wo kann man einen eigentlich einen Code eingeben?

 

Grüezi Tauchmann

Hmmm, wenn Du die Filter-Logik umdrehst kannst Du den gewünschten Wert über den Spezialfilter an einen anderen Ort kopieren (lassen) und dann die Originaldaten löschen.

 

Hmmm... Ich weiß jetzt nicht, was Du da als Makro aufgezeichnet hast. Aber mein erster Verdacht wäre auch, den AutoFilter "benutzerdefiniert" zu nehmen und auf "entspricht nicht" - "a" zu setzen. Wenn das dann zu obiger Aufzeichnung führt, wundert's mich allerdings auch.

Den VBA-Editor erreichst Du mit Alt-F11 aus der Mappe heraus. Aber das mü´ßtest Du doch schon wissen, wenn Du dort den aufgezeichneten Code herauskopiert hast...?

Gruß, Michael

 

Hallo,

bitte entschuldigt die späte Antwort, mein verlängertes WE hat keinen Computerkontakt :) beinhaltet (tat mal sehr gut).

Mhh, da ich leider noch nicht fit in VBA bin, würde ich gerne einfach nur die Filterkriterien umdrehen.
In dem obigen Fall soll der Wert "a" nicht ausgewählt werden und alle anderen sollen angezeigt werden.

Criteria1:=Array("b", _
"c", "v"),

Jetzt habe ich euren Vorschlag ausprobiert und folgendes zeichnet Excel auf: Criteria1:="<>*a*",
So sollte es jetzt funktionieren.

Danke

@miriki

ich meinte mit "Wo kann man einen eigentlich einen Code eingeben?" eigentlich hier im Forum, damit der Code für die Leser besser lesbar ist.

 

Ah, ok... ;-) Den Code fügst Du erstmal als ganz normalen Text ein. Danach markierst Du den Code-Bereich und klickst über dem Editor-Fenster das # an.

Damit wird der Bereich mit "[ CODE ]" und "[ / CODE ]" (ohne die Leerzeichen) eingefaßt, was man demzufolge auch manuell machen könnte.

Beim Betrachten des Artikels wird dieser Block dann entsprechend anders angezeigt, wie z.B. auch die Zitate mit "[ QUOTE ]" bis zum "[ / QUOTE ]"

Gruß, Michael