Autofilter aus WORD heraus
gerwas
Ich sitze hier vor einem Problem, zu dem ich auch im Archiv keine Lösung gefunden habe. Vielleicht kann mir jemand einen Tipp geben.
Ich habe eine Tabelle mit Daten, die ua. die Felder Jahr und Monat haben. Ich möchte nun einen Autofilter setzten der mir ein bestimmtes Jahr und einen bestimmten Bereich an Monaten filtert. Das setzen des Filters mit dem Jahr funktioniert aber der Filter mit den Monaten nicht!! Warum? Was mache ich hier falsch?
anbei Macro das aus WORD heraus gestartet wird!
Sub einlesen_quartal()
Set mQuellFile = GetObject(mPfad & "sammlung.xls")
Set mQuelle = mQuellFile.sheets(1)
Set mZiel = ActiveDocument
mJJ = Year(Date) 'jahr
mQt = DatePart("q", Date) 'quartal
mJJ = InputBox("Für welches Jahr wollen Sie einen Quartalsbericht fertigen?", " _
Bearbeitungszeitraum auswählen", mJJ)
If mJJ = "" Then Exit Sub
If Len(mJJ) =" & mBegin, Operator:=xlAnd, _
Criteria2:="