Die Zelle A1 wird mit der Farbe rot (3) eingefärbt
Programmzeile zum kopieren:
Range("A1").Interior.ColorIndex = 3
Wollen Sie eine andere Farbe, klicken Sie auf den nachfolgenden Link, um die gängigsten Farben mit den entsprechenden Nummern zu sehen: 002 Farbtabelle / Color-Index
Range("A1").Select
With Selection.Interior
.ColorIndex = 3
End With