Office: Unterschied Text in zwei Zellen auslesen. Geht das?

Hallo zusammen,

ich habe einen Report, der mir jeden Tag sagt, welche Produktbeschreibungen sich geändert haben. Das kann eine minimale Änderung (z.B Korrektur eines Rechtschreibfehlers) bis hin zur Neuverfassung ganzer Textabschnitte sein.

Gibt es irgendeine Möglichkeit den Unterschied mit Excel auszulesen bzw. anzuzeigen? Vielleicht per Conditional Formating oder ähnliches?

Bin für jede Hilfe dankbar.

Janine

 

Hi Janine,

man könnte z.B. per VBA den Ursprungstext in einen Zellkommentar schreiben - dann kannst du beide Textvarianten miteinander vergleichen. Wenn du die Korrektueren dann vergleichen hast, löschst du den Kommentar wieder. Du kannst es ja mal mit diesem Code versuchen:

Code:

Option Explicit
Dim strInhalt As String

Private Sub Worksheet_Change(ByVal Target As Range)
   If strInhalt <> "" Then
      Target.AddComment strInhalt
      strInhalt = ""
   End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   strInhalt = Target.Value
End Sub

Bei Erforderins kann man das janatürlich auch noch auf einen bestimmten Tabellenbereich einschränken, denn so wie er jetzt ist, bezieht sich der Code auf das gesamte Tabellenblatt und jeder Zelle, in der etwas geändert wird, wird der Kommentar hinzugefügt.

Bis später,
Karin

 

Danke schon mal sehr für deine Hilfe. Nur irgendwie bekomme ich es nicht nicht. Ich bin im Bereich von VBA noch sehr im Anfängerbereich. Wie muss ich den VBA Code einfügen? Als Modul oder so etwas in der Art?

Ich habe mal eine Musterdatei angefügt. Weiß nicht ob das hilft?

Danke J

 

so wie ich das jetzt sehe, sind beide Texte, Original und geänderter Text, bereits vorhanden - dann geht das mit der von mir vorgeschlagenen Methode nicht.

Bis später,
Karin

 

Kein Problem. Bin gerade im Internet fündig geworden: http://www.diffchecker.com/diff

Danke aber für die Hilfe