Wie bringe ich bei Excel Makros zum Laufen?

... komplette Frage anzeigen

1 Antwort

Mach mal einen Rechtsklick auf den Tabellenreiter (unten, da wo z.B. Tabelle1 steht) und gehe dann auf "Code anzeigen...".
In das große Fenster des VBA-Editors, der sich dann öffnet kopierst Du Deinen Code:

Private Sub Worksheet_Change(ByVal Target As Range)
Target.Font.ColorIndex = 5
End Sub

Die Datei musst Du danach aber als .xlsm speichern, und Makros zulassen.

Dieser Code oben ändert aber nicht die Farbe der Zelle, sondern die Schriftfarbe in der Zelle. Die Farbe der Zelle änderst Du so:

Private Sub Worksheet_Change(ByVal Target As Range)
Target.Interior.ColorIndex = 5
End Sub
Antwort bewerten Vielen Dank für Deine Bewertung

Was möchtest Du wissen?