Fortryd virker ikke pga. VBA

Hejsa,

Jeg har en VBA kørende i baggrunden, for at farve teksten i en celle blå fra et bestemt ord og resten af teksten i cellen, hvis den finder det bestemte ord.
Dette gør så at jeg ikke kan fortryde en handling mere.
Det har jeg som sådan fået svar på her, med mindre der er kommet nye ting til senere. https://www.computerworld.dk/eksperten/spm/1012510

Jeg kan så lave det som en kode der køres med fx tryk på en knap.
Men vil det kunne laves med en betinget formatering af cellerne?

Her er min kode:
Public Sub Worksheet_Change(ByVal Target As Range)

'Sub TextPartColourMacro()

' Declarations and Initialisation
Dim Row As Integer, Col As Integer
Dim CurrentCellText As String
Col = 8

' Loop Through Rows
For Row = 20 To 3500

    ' Get Text in Current Cell
    CurrentCellText = ActiveSheet.Cells(Row, Col).Value
   
    ' Get the Position of the Text WORD
    StartPosition = InStr(1, CurrentCellText, "WORD:")
     
    ' Colour the Word Blue
    If StartPosition > 0 Then
        ActiveSheet.Cells(Row, Col).Characters(HotStartPosition, 2000).Font.Color = RGB(0, 0, 255)
   
    End If
   
Next Row

End Sub