Hallo Gast65208,
erstmal vielen Dank für Dein Interesse!
Der Faktor der entscheidet, welcher Wert der aktuellere ist, ist der USER.
Dies kann man nicht automatisieren!
Ich habe die Aufgabe nochmals mit besserer Formatierung hinzu gefügt.
Gruß
Charly_Feivel
Hallo ihr VBA-Speziallisten, ich bin VBA-Neuling und habe eine Aufgabe zu lösen bei der ich eure Hilfe benötige:
Zellen in 2 Dateien vergleichen, Unterschiede in MsgBox anzeigen und per Button (links oder rechts) entscheiden welcher Wert der Aktuellere ist, der dann in die anderen Datei übernommen werden soll.
Aufgabe:
-
öffne Datei „A“ (ist eine xlsm-Datei), Tabelle1
-
öffne Datei „B“ (ist eine xlsm-Datei), Tabelle1
-
lese in Datei „A“ Zell-Wert „CZ9“
-
suche in Datei „B“ in Spalte „CZ“ Zelle „CZ9“ bis „CZ1500“ den gleichen Zell-Wert
-
wenn Wert gefunden (z.B. in „CZ15“), dann vergleiche in beiden Dateien die Zellen „A15“ mit „A15“, „B15“ mit „B15“, usw. bis „O15“mit „O15“.
Dann weiter „T15“ mit „T15“ usw. bis „BA15“ mit „BA15“.
-
Wenn Zell-Wert unterschiedlich (z.B. Datei „A“-„K15“ = 10; Datei „B“-„K15“ = 25, dann die Werte in MsgBox oder Fenster nebeneinander Anzeigen.
Beispiel:
Dateiname: „A“ Dateiname: „B“
Spaltenüberschrift „CZ“: Zelle „CZ15“ Spaltenüberschrift „CZ“: Zelle „CZ15“
Spaltenüberschrift „“A“: Zelle „A15“ Spaltenüberschrift „“A“: Zelle „A15“
Spaltenüberschrift „K“ : Zelle „K15“ Spaltenüberschrift „K“ : Zelle „K15“
Buttonüberschrift „links nach rechts“ Buttonüberschrift „rechts nach links“
[Button] [Button]
MakroEnde
[Button]
Der User entscheidet dann durck clicken auf den Button „links nach rechts“, das der Wert „A“-„K15“ aktueller ist und in die Zelle „B“-„K15“ geschrieben werden soll.
So sollen dann alle unterschiedlichen Werte angezeigt, kontrolliert und bestätigt werden bis Zeileninhalte gleich sind.
-
lese in Datei „A“ Zell-Wert „CZ10“
-
suche in Datei „B“ in Spalte „CZ“ Zelle „CZ9“ bis „CZ1500“ den gleichen Zell-Wert
-
wenn Wert gefunden (z.B. in „CZ25“), dann vergleiche in beiden Dateien die Zellen „A25“ mit „A25“, „B25“ mit „B25“, usw. bis „O25“mit „O25“.
Dann weiter „T25“ mit „T25“ usw. bis „BA25“ mit „BA25“.
-
Wenn Zell-Wert unterschiedlich (z.B. Datei „A“-„AG25“ = 10; Datei „B“-„AG25“ = 25, dann die Werte in MsgBox oder Fenster nebeneinander Anzeigen.
Beispiel:
Dateiname: „A“ Dateiname: „B“
Spaltenüberschrift „CZ“: Zelle „CZ25“ Spaltenüberschrift „CZ“: Zelle „CZ25“
Spaltenüberschrift „“A“: Zelle „A25“ Spaltenüberschrift „“A“: Zelle „A25“
Spaltenüberschrift „AG“ : Zelle „AG25“ Spaltenüberschrift „AG“ : Zelle „AG25“
Buttonüberschrift „links nach rechts“ Buttonüberschrift „rechts nach links“
[Button] [Button]
MakroEnde
[Button]
Der User entscheidet dann durck clicken auf den Button „rechts nach links“, das der Wert „B“-„AG25“ aktueller ist und in die Zelle „A“-„AG25“ geschrieben werden soll.
So sollen dann alle unterschiedlichen Werte angezeigt, kontrolliert und bestätigt werden. Zeile für Zeile.
7. Usw
8. Bei dem Button „MakroEnde“ soll das Makro jeder Zeit beendet werden können.
P.S. Der Faktor der entscheidet, welcher Wert der aktuellere ist, ist der USER.
Dies kann man nicht automatisieren!
Ich hoffe ich habe die Aufgabe verständlich beschrieben.
Vielen Dank an Alle im Voraus die sich an der Lösung beteiligen.
Bei Fragen bitte melden.
Gruß Charly_Feivel
|