Thema Datum  Von Nutzer Rating
Antwort
09.06.2020 12:26:09 Alex
NotSolved
09.06.2020 13:58:47 Gast45045
NotSolved
Rot Macro in Word, Wörter finden - Vergleichen - Farblich markieren
09.06.2020 21:46:13 ralf_b
NotSolved
09.06.2020 21:48:27 ralf_b
*****
Solved

Ansicht des Beitrags:
Von:
ralf_b
Datum:
09.06.2020 21:46:13
Views:
801
Rating: Antwort:
  Ja
Thema:
Macro in Word, Wörter finden - Vergleichen - Farblich markieren
versuch mal mit regular expression. damit kann man Mustervergleiche durchführen. 
gibt im netz viele gute Beispiele
hab hier mal ein grundgerüst zusammengeschraubt. 
wenn du die zellen in deinem word richtig ansprichst, kannst du das script entsprechend anpassen
die regular expression bibliothek muß in deinem excel noch über Verweise eingebunden werden. 


'Für VBA gibt es dafür die Microsoft VBScript Regular Expressions-Objektbibliothek.
Public Function vergleiche(str As String, muster As String) As Boolean
    Dim regex As New RegExp
    regex.Pattern = muster
    vergleiche = regex.test(str)

End Function

Sub test2()
  Dim x
    For Each x In spalte1
    
        If vergleiche(x, "@/num@") And _
           vergleiche(x.Offset(0, 1), "@/num@") Then
            If x = x.Offset(0, 1) Then
                x.Interior.Color = vbGreen
                x.Offset(0, 1).Interior.Color = vbGreen
            Else
                x.Interior.Color = vbRed
                x.Offset(0, 1).Interior.Color = vbRed
            End If
        End If
    Next

 


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
09.06.2020 12:26:09 Alex
NotSolved
09.06.2020 13:58:47 Gast45045
NotSolved
Rot Macro in Word, Wörter finden - Vergleichen - Farblich markieren
09.06.2020 21:46:13 ralf_b
NotSolved
09.06.2020 21:48:27 ralf_b
*****
Solved