Wenn Zelle grau hinterlegt, dann!
24.10.2003 13:20:38
Chris
Ich möchte, wenn die Hintergrundfarbe der Zelle "D26" oder "D27" oder "D28" oder ,.... "D35" weiß ist, dann soll abgebrochen werden!
Wenn die Hintergrundfarbe "grau" ist, dann soll die Ganze Zeile gelöscht werden!
Bekomme das hin, bis auf die Hintergrundbedingungen, vielleicht kann mir ja jemand mein Makro vervollständigen!
Wäre echt klasse!
Gruß Chris
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim k As Integer
Dim l As Integer
If Target.Column = 4 And Target.Row > 24 Then
If Target.Value <> "" Then
Rows(Target.Row + 1).Insert
ElseIf ......
HIER MUSS DIE FARBBEDINGUNG REIN! Denke mit ner If-Schleife geht es sicher, bekomme es nur einfach nicht hin!
.... then
Rows(Target.Row).Delete
Application.ScreenUpdating = True
End If
End If
ende:
End Sub
Anzeige