Thema Datum  Von Nutzer Rating
Antwort
Rot Tabellen Vergleichen und aktualisieren
16.05.2017 07:23:52 clx211991
NotSolved

Ansicht des Beitrags:
Von:
clx211991
Datum:
16.05.2017 07:23:52
Views:
1071
Rating: Antwort:
  Ja
Thema:
Tabellen Vergleichen und aktualisieren
VBA Makro Tabellen Kopieren und Vergleichen Beitragvon climaex21 » 15. Mai 2017, 15:24 Hallo Leute, ich bin absoluter VBA Neuling. Die Aufgabe die ich lösen muss ist die folgende: In einen Ordner wird eine neue Excel Datei (2) kopiert In meiner Analyse Datei (1) wird der Name der (2) eingetragen (2) wird geöffnet, Daten kopiert, In (1) kopieren und (2) wieder schließen. Mit 0 Ahnung und ein bisschen rumprobieren hab ich das folgende mir zusammengereimt. Code: Sub Daten_importieren() Dim strPfad As String strPfad = ThisWorkbook.Path Workbooks.Open strPfad & "" & Worksheets("Button").Range("A3").Text Worksheets(1).Range("A3:C200").Select Selection.copy Application.DisplayAlerts = False ActiveWorkbook.Close Application.DisplayAlerts = True ThisWorkbook.Worksheets("Zwischenablage").Activate Worksheets(2).Range("A1").Select ActiveCell.PasteSpecial End Sub Dazu meine erste Frage: Wie muss der Code aussehen damit ich die Datei basieren auf dem Namen öffnen wenn das Workbook nicht im selben Pfad ist? Jetzt zu meinem eigentlichen Problem. Ich habe jetzt aus (2) die Daten in Excel (1) kopiert. In das Tabellenblatt Zwischenablage. Nun gibt es noch ein Tabellenblatt Reklapool. Jetzt möchte ich die Einträge in Zwischenablage mit denen aus Reklapool vergleichen, ggf übernehmen bzw. aktualisieren und dann die Zwischenablage wieder leeren. Um das Design zu verdeutlichen - Die folgenden 3 Überschriften haben die Tabellen: Rekla-ID , Abgeschlossen am Werk , Fällig AM Die Tabellen sollen nun folgend verglichen werden: 1_ Wenn die Rekla-ID aus Zwischenablage nicht in Reklapool vorhanden ist einfach den Eintrag zu der Tabelle Reklapool hinzufügen 2_ Wenn es die selbe ID gibt aber Abgeschlossen am Werk jetzt vorhanden dann hinzufügen 3_ Wenn es die selbe ID gibt und das Fällig AM datum geändert wurde übernehmen 4_ Wenn alle Einträge gleich sind nicht übernehmen 5_ zwischenablage löschen Somit soll die Tabelle Reklapool einfach größer werden. Datensätze werden importiert, ggf hinzugefügt und Zwischenablage wieder geleert. Für jede Hilfe bedanke ich mich schon im vorraus. Ich habe versucht mir VBA ein bisschen beizubringen nebenbei aber dieses Aufgabe kann ich gerade wirklich nicht lösen. Mfg Niklas

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 Tabellen Vergleichen und aktualisieren
16.05.2017 07:23:52 clx211991
NotSolved