Problem mit Interior.Colorindex
15.08.2020 13:01:49
Peter
Ich versuche via VBA die Schriftfarbe und die Hintergrundfarbe zu ändern. Sofern ich nur die Schriftfarbe setze funktioniert alles. Sobald ich versuche die Hintergrundfarbe zu setzen funktioniert es nicht mehr. Nur die erste Zelle des angegebenen Ranges erhält rote Schriftfarbe.
Mein System ist OSX.
Vielen Dank und viele Grüße Peter
Function SDue(SRange As Range)
Dim myCell As Range
SDue = 0
For Each myCell In SRange
' set Font red
myCell.Font.ColorIndex = 3
' set Background yellow
myCell.Interior.ColorIndex = 6
Next myCell
End Function
Bsp.:Zuweisung von A1: =SDue(B3:D3)
Inhalt von A1: #WERT
Farbe von B3: Rot