Von einer roten Zahl zur nächsten...
05.03.2021 10:15:15
nightcab
Nachfolgender Code findet die erste rote Zahl von oben weg. Funktioniert wie gewünscht.
Nur würde ich jetzt brauchen, dass der Cursor von einer roten Zahl zur nächsten springen kann wenn man das Makro erneut startet. Und wenn er bei der letzten roten Zahl angekommen ist, wieder ganz oben bei der ersten beginnt.
Sub rot()
Dim c As Range
Application.FindFormat.Font.ColorIndex = 3
Set c = Cells.Find(What:="", SearchFormat:=True)
c.Select
End Sub
Kann mit bitte wer helfen?
Gruß nightcab