Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
808to812
808to812
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wert aus zwei Dateien vergleichen

Forumthread: Wert aus zwei Dateien vergleichen

Wert aus zwei Dateien vergleichen
11.10.2006 11:15:08
Mikey
Hallo Excelfreunde,
ich habe mal wieder eine Frage.
Ich habe ein Makro aufgezeichnet, das Daten aus einen Bericht in eine Datenbank übernimmt. Die zwei Dateien heißen(_Bericht.xls) und (Datenbank.xls).
Jetzt möchte ich aber bevor das Makro den Bericht überträgt folgendes überprüft.
Ist die Nr. die im Bericht immer in der Zelle "K2" steht gleich der Nr. die in der Datenbank immer in der letzten Zeile in der Spalte "J" steht. Wenn die Nummern gleich sind sollte das Makro weiterlaufen, wenn sie ungleich sind sollte eine Meldung kommen und das Makro abgebrochen werden.
Ich hoffe ich habe mich verständlich ausgedrückt und ihr könnt mir weiter helfen!
Vielen Dank im voraus für euer Bemühen!
Gruß
Mikey
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert aus zwei Dateien vergleichen
11.10.2006 12:14:11
Reinhard
Hi Mikey,
poste mal den Code...
Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
AW: Wert aus zwei Dateien vergleichen
11.10.2006 13:04:33
Mikey
Hallo Reinhard,
ich habe schon etwas rumgebastelt, greife aber eben auf eine feste Zelle zu nicht auf die letzte ZEILE!!
If Workbooks("_Bericht.xls").Sheets("Tabelle1").Range("K2") Workbooks("_Makro Bericht Mini-PS Test.xls").Sheets("Datenbank").Range("J4") Then
Sub Makro2()
Dim MeldungI As String
MeldungI = "Abbruch"
'Bildschirm wird nicht aktuallisiert
' Application.ScreenUpdating = False
Windows("_Makro Bericht Mini-PS Test.xls").Activate
Sheets("Datenbank").Activate
'Datenbank sortieren
Columns("A:I").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
'UserForm starten
UserForm1.Show
Sheets("Makro").Activate
ActiveWorkbook.Save
'Bericht Mini-PS wird geöffnen
Workbooks.Open FileName:= _
"\\lud\Aufgaben\Bericht MiniPS\_Bericht.xls"
If Workbooks("_Bericht.xls").Sheets("Tabelle1").Range("K2") Workbooks("_Makro Bericht Mini-PS Test.xls").Sheets("Datenbank").Range("J4") Then
MsgBox (MeldungI)
Exit Sub
End If
Columns("A:A").Select
Selection.Insert Shift:=xlToRight
Range("A2:A34").FormulaR1C1 = "=RC[1]*1"
....
Ich hoffe du kannst mir weiterhelfen.
Gruß
Mikey
Anzeige
AW: Wert aus zwei Dateien vergleichen
11.10.2006 13:12:52
Reinhard
Hi Mikey,
anfangs des Codes:
Set wsT = Workbooks("_Bericht.xls").Sheets("Tabelle1")
Set wsD = Workbooks("_Makro Bericht Mini-PS Test.xls").Sheets("Datenbank")
ZeiD = wsD.Range("J65536").End(xlUp).Row ' letzte Zeile in J von wsD
dann kannst du später mit kürzeren Zeilen arbeiten:
If wsT.Range("K2") wsd.Range("J" & ZeiD) Then
oder auch
With wsT
If .Range("K2") wsD.Range("J" & ZeiD) Then
'...
End If
End With
Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Wert aus zwei Dateien vergleichen
11.10.2006 13:37:21
Mikey
Hallo Reinhard,
ich habe den Code in mein Makro eingebaut, leider kommet jetzt eine Fehlermeldung
Fehler beim Kompilieren: Methode und Datenbank nicht gefunden! es wird dann folgendes markiert:
wsd.Range im Code
Zeid = wsd.Range("J65536").End(xlUp).Row ' letzte Zeile in J von wsD
Kannst du mir noch sagen was fehlt?
Vielen Dank
Mikey
Anzeige
AW: Wert aus zwei Dateien vergleichen
11.10.2006 13:50:34
Reinhard 

Hi Mikey,
schreibe mal
Option Explicit
zualleroberst in das Modul, also oberhalb der Sub, dann werden die Variablenschreibweise
geprüft und du wirst gezwungen Dim zu benutzen. Tipp: Schreibe den ersten Buchstaben
aller Variablen in der Dim Anweisung groß. Wenn du dann im Code die Variablen eingibst
und der erste Buchstabe wird nicht automatisch groß gemacht (nach Verlassen der Zeile)
hast du sie falsch geschrieben.
Wenn dann der Fehler immer noch kommt liegt es wohl an deiner Excelversion. melde dich
dann nocmal und poste den kompletten neuen Code.

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Wert aus zwei Dateien vergleichen
11.10.2006 14:03:53
Mikey
Hallo Reinhard,
leider kommt der fehler immer noch!!!
Ich habe das wie folgt eingegeben:
Dim MeldungI As String
Dim WsT As Workbooks, Wsd As Workbooks
Set WsT = Workbooks("_Bericht.xls").Sheets("Tabelle1")
Set Wsd = Workbooks("_Makro Bericht Mini-PS Test.xls").Sheets("Datenbank")
Zeid = Wsd.Range("J65536").End(xlUp).Row ' letzte Zeile in J von wsD
Hast du noch eine Idee?
Danke für dein Bemühen
Gruß
Mikey
Anzeige
AW: Wert aus zwei Dateien vergleichen
11.10.2006 23:26:52
Reinhard
Hi Mikey,
Dim MeldungI As String
Dim WsT As Worksheet, WsD As Worksheet, ZeiD as long
Set WsT = Workbooks("_Bericht.xls").Sheets("Tabelle1")
Set Wsd = Workbooks("_Makro Bericht Mini-PS Test.xls").Sheets("Datenbank")
Zeid = Wsd.Range("J65536").End(xlUp).Row ' letzte Zeile in J von wsD
Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
Vielen Dank
12.10.2006 07:34:31
Mikey
Hallo Reinhard,
vielen DANK für die Geduld mit mir. Jetzt läuft es wie es sein sollte.
Gruß
Mikey
;

Forumthreads zu verwandten Themen

2 Zellen aus verschiedenen Dateien vergleichen
Joni

Hi,
ich sollte die Werte aus 2 Zellen aus verschiedenen Dateien miteinander vergleichen und verwende dafür folgende Zeile:
If .Cells(j, 2) = Workbooks(DNSB).Worksheets(Bericht1).Cells(jj, 2) Then
Leider erhalte ich immer eine Fehler. Ich habe auch schon andere Varianten probiert. Do...
08.06.2009 00:57:53
Thread-ID: 1079774
8 Beiträge
Zwei Dateien vergleichen
Peter

Hallo wertes Forum,
ich brauche Ansatzhilfe.
Ich möchte gern mittels Makro 2 Dateien vergleichen
Öffne Datei 1 öffne Datei 2 und vergleiche die Änderung jeweil in Tabelle1 in Spalte D
Beide Datei sind ca 48000 Zeilen groß.
Datei 1 wäre die Masterdatei und die Änderungen aus...
18.06.2009 23:22:05
Thread-ID: 1082750
15 Beiträge
2 Tabellen aus 2 Dateien miteinander vergleichen
Frank

Hallo zusammen,
Ich habe hier noch mal was für die Excel Cracks
Ausgangslage:
Protokolldatei (in dieser Datei befinden sich die Makros; und letztendlich die kopierten Zeilen in denen Unterschiede gefunden wurden)
Aus der Protokolldatei heraus (Datei1 Tabelle Monat07; Datei2 Tabe...
10.09.2009 02:30:35
Thread-ID: 1101552
2 Beiträge
zwei Dateien vergleichen
Selina

Guten Tag !
Ich stehe vor einem bisher für mich unlösbaren Problem. Zwar bin ich auf meiner Suche zu unzähligen ähnlichen Posts gestossen, allerdings fand ich bisher die beste Lösung noch nicht :-(
Und zwar gehts um folgendes:
Ich möchte mittels einem Makro zwei Excel Dateien zusamm...
12.12.2011 12:40:17
Thread-ID: 1241670
18 Beiträge
2 Dateien vergleichen und Wert ausgaben
Andreas

Hallo Community,
ich habe 2 Dateien, welche in Spalte B identische Werte hat, jedoch willkürlich verteilt. Sprich Zelle B5 in Datei 1 kann in Datei 2 Zelle B13 sein. Datei 1 (Datei.1-Bearbeitung) ist die Datei, welche immer bearbeitet wird. Datei 2 (Datei.2-Check) benötigt jedoch immer den...
07.04.2012 11:17:49
Thread-ID: 1258255
6 Beiträge
Zwei Dateien Vergleichen und Differenz berechnen
Nina

Hallo zusammen!
Ich habe jetzt schon eine ganze Weile ein Problem in der vba-Programmierung. Leider habe ich noch nie vba programmiert :(
Es geht um folgendes: Ich möchte zwei Excel-Dateien auswählen (vllt über eine Dialog-Box oder der Benutzer muss diese einfach von vorn herein geöffne...
14.03.2013 15:52:45
Thread-ID: 1304012
15 Beiträge
Anzeige
Excel 2010-Dateien vergleichen - alte Mitglieder e
Ardona

Guten Abend
Ich habe alte Tabellen aus verschiedenen Regionen, wo die Mitglieder wie folgt gelistet sind:
Nachname (Spalte A), Vorname (Spalte B), E-Mail-Adresse (Spalte C), Herr oder Frau (Spalte D), Stasse (Spalte E) etc.
Die Mitglieder sind alphabetisch von A-Z (Spalte A) geordne...
19.07.2013 14:38:35
Thread-ID: 1323256
3 Beiträge
Zellen inhalte zwischen 2 Dateien vergleichen
HerrA

Hallo zusammen,
kann mir jemand helfen?
Ich habe in einer Datei einen Wert in einer Zelle stehen. Nun soll in einer anderen Datei (immer die Gleiche) die Zeilen nach dem Wert (der immer in der gleichen Spalte C steht) durchsucht werden. Sobald in der Spalte C der Wert gefunden wurde sol...
01.04.2014 12:47:45
Thread-ID: 1355664
6 Beiträge
2 Dateien vergleichen
Thomas

Hi,
hab da wieder mal ne frage^^
ich hab zwei Dateien.
Datei 1 wurde am Montag angelegt, da sind sehr viele Werte, text, etc hinterlegt.
Datei 2 wurde am Mittwoch angelegt, da sind manche Werte, texte etc von Montag verändert worden, manche nicht, es sind aber auch neue dazu gek...
14.04.2014 12:04:24
Thread-ID: 1357227
6 Beiträge
2 Dateien vergleichen
Michael

Hallo!
Folgendes Problem hab ich. Ich muss 2 Tabellen miteinander vergleichen.
Tabellen Blatt 1 (meine aktiven Angebote)
Spalte A: EAN Code
Spalte B; Warenbeschreibung
Tabellen Blatt 2 (Bestand des Großhändlers)
Spalte A: EAN Code
Spalte B: Warenbeschreibung
Spal...
24.12.2014 10:53:27
Thread-ID: 1399520
2 Beiträge
Anzeige
Zellen vergleichen - zwei Excel Dateien
Stefan

Huhu,
ich würde gern z.B. die komplette Spalte "C" aus 2 verschiedenen Excel-Dateien vergleichen und wenn es eine Dopplung gibt die jeweilige Zeile in farbig makieren...
ich habe leider nur wenig VBA-Kenntnisse und weis nicht genau ob ich auf dem richtigen Weg bin :) vielleicht könnt ih...
05.05.2015 14:23:16
Thread-ID: 1424709
2 Beiträge
2 Excel-Dateien miteinander vergleichen
Michael

Hallo,
ich bin ganz neu was VBA Programmierung angeht und bräuchte Hilfe. Ich habe die Foren schon durchgeforstet und um 2 Excel-Dateien miteinander zu vergleichen gibt es einige Threads, allerdings konnte ich diese für mein Problem leider nicht benutzen und hoffe hier auf Hilfe.
Ich ha...
03.08.2015 13:59:59
Thread-ID: 1440036
9 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige