Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.04.2024 20:05:21
28.04.2024 18:33:31
28.04.2024 18:25:12
28.04.2024 14:18:05
Anzeige
Archiv - Navigation
1916to1920
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

excel filter mehrfachauswahl vba

excel filter mehrfachauswahl vba
03.02.2023 15:37:25
Robert
Hallo an alle,
Ich habe eine Liste mit Fahrzeugen wo täglich die Kilommeter eingetragen werden.
Nach einem Klick auf den Button "Bericht" erstellt es eine eine PDF die dann per Mail Versendet wird.
Das Macro sieht so aus:
'Auf BR 8442 filtern und als pdf abspeichern
    Columns("M:M").EntireColumn.Hidden = True
        'ActiveSheet.Range("$A$8:$M$63").AutoFilter Field:=3, Criteria1:="=7331"
        ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        DateiName _
        , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
        :=False, OpenAfterPublish:=True
   'ActiveSheet.ShowAllData
Nun haben wir zusätzliche Fahrzeuge bekommen die 6220 heißen. Wie kann ich dem Code sagen das er diese auch mit ausgibt. Diese sind in der Selben Spalte.
Danke

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: excel filter mehrfachauswahl vba
03.02.2023 16:02:24
UweD
Hallo
wenn es nur 2 sind dann so
        ActiveSheet.Range("$A$8:$M$63").AutoFilter Field:=3, _
            Criteria1:="=6220", Operator:=xlOr, Criteria2:="=7331"
 
sonst
           
        ActiveSheet.Range("$A$8:$M$63").AutoFilter Field:=3, _
            Criteria1:=Array("6220", "999", "7331"), Operator:=xlFilterValues
LG UweD
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige