Bedingte Formatierung Autoform
10.10.2016 09:35:22
Lutz
ich habe es mit Recherche hinbekommen Zellabhängig ein Rechteck zu formatieren (Füllfarbe).
Folgende Frage ergibt sich für mich allerdings - wie schaffe ich es denn ausschließlich die Farbe des Rahmens zu ändern?!
Gerne auch mit Tipp für ein Tutorial.
Wie immer besten Dank für eure Hilfe.
Allen einen schönen Start in die Woche.
Sub FarbeDreieck()
If Tabelle10.Range("C46") = "" Then
With Tabelle10.Shapes("rechteck1").Fill
.ForeColor.RGB = RGB(255, 0, 0)
End With
Else
With Tabelle10.Shapes("rechteck1").Fill
.ForeColor.RGB = RGB(0, 255, 0)
End With
End If
End Sub