Thema Datum  Von Nutzer Rating
Antwort
Rot VBA für suchen, ersetzen und einfärben
20.09.2018 13:29:37 Leroy
NotSolved
20.09.2018 15:33:03 Ulrich
NotSolved
20.09.2018 15:42:01 Gast45403
NotSolved
20.09.2018 16:03:32 Gast64263
NotSolved
20.09.2018 16:22:22 Gast72854
NotSolved
20.09.2018 16:30:04 Gast38401
NotSolved
20.09.2018 18:31:02 Gast63833
NotSolved
20.09.2018 21:48:03 Ulrich
NotSolved
20.09.2018 22:33:51 Gast55980
NotSolved

Ansicht des Beitrags:
Von:
Leroy
Datum:
20.09.2018 13:29:37
Views:
969
Rating: Antwort:
  Ja
Thema:
VBA für suchen, ersetzen und einfärben

Hallo zusammen

 

Habe folgendes Problem:

 

Um mehr Verständniss in die Sache zu bringen hier vorab die Erläuterung zweier Dateien:

Die erste Ecxel - Ist eine Auflistung eines Artikelstammes in der in der Spalte A immer die Artikelnummer steht. In Spalte I steht der Einstandspreis und in Spalte J der Verkaufspreis. Dazwischen und rundherum stehen Daten, die ich nicht bearbeiten will, aber auch nicht löschen. Die sollen einfach bleiben wo sie sind.

Die zweite Excel - Ist eine Preisliste eines Lieferanten und kann immer stark variieren, was aber kein Problem sein sollte da man ja einfach alle Daten ausser Artikelnummer und Preise Löschen kann. Auch, dass die Artikelnummer immer in Spalte A steht und die Preise in Spalten I und J ist kein Thema.

 

Nun möchte ich diese beiden Listen vergleichen und die neuen Preise, welche ich von der Preisliste habe(zweite Datei) in die erste Datei schreiben. Zu dem hinzu hätte ich gerne, dass die ersezten Daten farblich markiert werden. Ebenso farblich hinterlegt sollen die Zellen werden, welche beim Abgleich keinen Treffer ergaben, also demnach neue Artikel sind (Wenn Ursprung aus Datei Zwei) oder alte Artikel (Wenn Ursprung aus Datei eins).

Weiter wäre es toll wenn das Makro in Spalte S das aktuelle Datum schreibt, wenn es einen neuen Preis eingefügt hat.

 

Ich weiss auch nicht ob es einfacher ist, wenn man die Zweite Liste einfach in ein zweites Arbeitsblatt kopiert oder ob das auch unterschiedliche Dateien sein können. Ich habe mich bis jetzt nur mit ganz simplen Sachen im VBA versucht und bin an diesem Ding mit einem Kollegen seit 2 Tagen dran. Hoffentlich kann mir hier jemand helfen!

 

Folgende Links habe ich bereits ausprobiert, konnten mir aber nicht ganz so das Ergebnis liefern, was ich erhofft habe:

http://www.herber.de/forum/archiv/1468to1472/1469573_Spalten_vergleichen_und_Unterschiede_markieren.html

http://www.herber.de/forum/archiv/376to380/377235_Werte_vergleichen_und_ggf_ersetzen.html

https://www.ms-office-forum.net/forum/showthread.php?t=307750


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 für suchen, ersetzen und einfärben
20.09.2018 13:29:37 Leroy
NotSolved
20.09.2018 15:33:03 Ulrich
NotSolved
20.09.2018 15:42:01 Gast45403
NotSolved
20.09.2018 16:03:32 Gast64263
NotSolved
20.09.2018 16:22:22 Gast72854
NotSolved
20.09.2018 16:30:04 Gast38401
NotSolved
20.09.2018 18:31:02 Gast63833
NotSolved
20.09.2018 21:48:03 Ulrich
NotSolved
20.09.2018 22:33:51 Gast55980
NotSolved