Hallo,
ich bekam eben schon tolle Hilfe und vllt. kann mir nochmal jemand helfen?
Mit dem unten stehenden Code soll bei Doppelklick auf H9 die Schriftfarbe in Grün wechseln und simultan dazu auch die in F9 (also 2 Spalten davor).
Wie kann ich den Code dahingehend ergängen das dieser nicht nur für H9 funktioniert sondern für H9:H14 und H17:H20?
Hat da jemand eine Idee?
1
2
3
4
5
6
7
If Not Intersect(Target, Range("H9")) Is Nothing Then
With Intersect(Target, Range("H9"))
.Font.Color = RGB(0, 255, 0)
.Offset(0, -2).Font.Color = RGB(0, 255, 0)
End With
Cancel = True
End If