Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Advanced Filter Kriterien befinden sich in einem anderen Workbook
 22.05.2014 10:52:40 Andrea
NotSolved

Ansicht des Beitrags:
Von:
Andrea		 Datum:
22.05.2014 10:52:40		 Views:
1116		 Rating:
     
Antwort:
  Ja
Thema:
VBA Advanced Filter Kriterien befinden sich in einem anderen Workbook

Hallo Leute.

Ich habe folgendes Problem, und zwar besitze ich zwei Tabellen die vom Aufbau gleich sind, sich aber in verschiedenen Workbooks befinden. In der ersten Spalte von beiden Tabellen befinden sich die Namen von Prüflingen. Jetzt würde ich gerne nur die Prüflinge betrachten, die sich in beiden Tabellen gleichzeitig befinden.

Als Lösung habe ich mir gedacht, dass ich einfach einen Advanced Filter wechselseitig in die erste Spalte einfüge, also zuerst von wkb1 in wkb2 und dann umgekehrt (jeweils nur von der ersten Spalte wo sich der Name der Prüflinge befindet).

Irgendwie läuft der Code auch durch, nur er filtert nichts raus. Es kommt auch keine Fehlermeldung oder sonstiges. Ich kenne mich leider mit VBA nicht so aus und bin gerade noch am lernen. Eventuell könnt ihr mir hier weiterhelfen :)

 

Sub Test ()

Dim KlistOld As String 'Path of the old CustomerList
Dim KlistNew As String 'Path of the current CustomerList


KlistOld = "C:\Users\uidg9767\Desktop\Test\Archiv\MFC-Kundenliste_Alt.xlsx"
KlistNew = "C:\Users\uidg9767\Desktop\Test\MFC-Kundenliste.xlsx"

Set OldListWkb = Workbooks.Open(KlistOld)
Set NewListwkb = Workbooks.Open(KlistNew)

Set InputOld = OldListWkb.Sheets(1)
Set InputNew = NewListwkb.Sheets(1)

InputOld.Activate

InputOld.UsedRange.Columns(1).AdvancedFilter _
                  Action:=xlFilterInPlace, _
                  CriteriaRange:=InputNew.UsedRange.Columns(1), _
                  Unique:=False


InputNew.UsedRange.Columns(1).AdvancedFilter _
                  Action:=xlFilterInPlace, _
                  CriteriaRange:=InputOld.UsedRange.Columns(1), _
                  Unique:=False

End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Advanced Filter Kriterien befinden sich in einem anderen Workbook
 22.05.2014 10:52:40 Andrea
NotSolved