xlThemeColorDark1
12.06.2014 18:20:42
Stephan
ich würde gerne in Tabelle 1 in der Zelle A7 die Schriftfarbe (weiß Hintergrund 1 15% dunkler) ändern. Mit dem Makrorekorder erhalte ich folgende Angabe:
Range("A7").Select
With Selection.Font
.ThemeColor = xlThemeColorDark1
.TintAndShade = -0.149998474074526
Vereinfacht habe ich folgenden Code: Sheets("Tabelle1").Range("A7").Selection.Font.ThemeColor = xlThemeColorDark1.TintAndShade = -0.149998474074526
Ich erhalte folgende Fehlermeldung: Fehler beim Kompilieren Ungültiger Bezeichner.
Würde mich über eine Lösung freuen.
Grüße
Stephan