habe Zellen A1 und A2 verbunden. Nun funktioniert unten stehender Befehl nicht mehr.
Set r1 = Cells(1, 1).Find("aaa")
If Not r1 Is Nothing Then
Application.Run "Colorindex"
End
End If
Kann mir jemand weiterhelfen?
Besten Dank
Karsten
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen