|
hallo und guten Tag
Mit eine VBA Code möchte ich ganz bestimmte Zellen in Excel füllen. Dass heisst, wenn ich zum Beispiel in A1 eine 10 eingebe, möchte ich gerne dass die Zellen B1-E1 und G1-M1 mit Roter Farbe befüllt wird.
Ich weiss, dass dies auch mit einer "Wenn"Formel gehen würde. Ich möchte aber dies mit VBA machen, da nach Füllen der Farbe ev. mit einer anderen Farbe darüber gefüllt werden muss.
Ich hab einen Code welcher eine Zelle befüllt. Dies aber nur ab der, in der die Zahl 10 geschrieben wird und nur durchgehend. Ich möchte aber das diese auch unterbrochen werden kann.
Wer kann mir weiterhelfen?
Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target
Case Is = "10"
Range(Target.Address, Target.Offset(, 4)).Interior.ColorIndex = 3
Case Is = "1"
Range(Target.Address, Target.Offset(, 7)).Interior.ColorIndex = 4
End Select
End Sub
Besten Dank für eure Mithilfe
Grüess
Jojue
|