Hallo zusammen,
habe folgendes Problem:
Ich benötige eine Funktion, die Spalte D nach dem Öffnen des Sheets automatisch durchsucht. Sobald in einer Zelle in Spalte D (Zellenformat Standard) der Text ...problem... oder ...Problem... oder ...PROBLEM... auftaucht, soll Zelle A1 farblich hinterlegt werden:
evtl. hiermit:?
With Worksheets(1).Cells(Zeile, Spalte).Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
Leider reichen meine Kenntnisse nicht aus, den richtigen Code zu erstellen. Habe schon viele Fehlversuche hinter mir.
Könnt ihr mir helfen?
Danke und Grüße
Michael |