Ich möchte eine VBA-Funktion schreiben, um bestimmten Text in einer Excel-Zelle hervorzuheben. Ist das möglich? Ich habe gegoogelt, aber es ist zu diesem Zeitpunkt unklar.

Zur Verdeutlichung möchte ich eine bestimmte Spalte nach einem Textwert durchsuchen (tatsächlich eine Liste von Werten) und den übereinstimmenden Text in etwa gelb hervorheben.

Hinweis: Folgendes habe ich letztendlich getan:

  Sub Colors()


    Dim searchString As String
    Dim targetString As String
    Dim startPos As Integer

    searchString = "abc"
    targetString = Cells(2, 1).Value
    startPos = InStr(targetString, searchString)

    If startPos > 0 Then

        Cells(2, 1).Characters(startPos, Len(searchString)).Font.Color = vbRed

    End If


 End Sub