Makro für Autofilter (Kriteria aus 2. Excel-Datei)

Computer: Software & Programmierung Office Software
1

Hallo zusammen,

ich habe eine Excel-Datei (1) mit Autofilter.

Gesucht werden soll nach Kriteria, welche aus Excel-Datei (2) kommen z.B. („B27“).
Bis jetzt nimmt mein Makro aber „B27“ aus der Excel-Datei (1) mit dem Autofilter und nicht aus der Datei (2).

Sub Auto()

Dim Value As String
Dim Datum As String

Value = Range(„B27“)
Datum = Range(„C27“)

Windows(Datei1.xls).Activate
Selection.AutoFilter Field:=6, Criteria1:=Value
Selection.AutoFilter Field:=13, Criteria1:=Datum

End Sub

Vielen Dank für Eure Hilfe

2

ich habe eine Excel-Datei (1) mit Autofilter.
Gesucht werden soll nach Kriteria, welche aus Excel-Datei (2)
kommen z.B. („B27“).
Bis jetzt nimmt mein Makro aber „B27“ aus der Excel-Datei (1)
mit dem Autofilter und nicht aus der Datei (2).

Hi As,

Sub Auto()
Dim Inhalt As String
Dim Datum As String
Inhalt = Workbooks(„Datei2.xls“).Worksheets(„Tabelle1“).Range(„B27“)
Datum = Workbooks(„Datei2.xls“).Worksheets(„Tabelle1“).Range(„C27“)
Windows(Datei1.xls).Activate
Selection.AutoFilter Field:=6, Criteria1:=Inhalt
Selection.AutoFilter Field:=13, Criteria1:=Datum
End Sub

Gruß
Reinhard