Markierte Zellen in bestimmter Farbe füllen
Nachfolgender Befehl färbt die in der Tabelle markierten Zellen in dunkelrot.
Sub Zellenfaerben() Dim FZel As Range For Each FZel In Selection FZel.Interior.ColorIndex = 30 Next FZel End Sub