ich möchte mittels vba abfragen, ob in einer zelle etwas eingetragen ist oder ob diese leer ist.
mein bisheriger versuch erzeugt compilierungsfehler:
If Cells(5, i) = "" Then
vielen dank!
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim i As Integer
For i = 2 To 15
If Cells(5, i).Value = "" Then
Cells(5, i).Interior.ColorIndex = 3
Else
Cells(5, i).Interior.ColorIndex = 4
End If
If Cells(1, 2).Value = "" Then
Cells(1, 2).Interior.ColorIndex = 3
Else
Cells(1, 2).Interior.ColorIndex = 4
End If
Next
End Sub