wer sagt mit, was ich falsch mache: wenn in Spalte C leer, dann Zeile ausblenden:
Sub ausblenden()
For i = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
If Cells(i, 3).Value = "" Then
Rows(i).Hidden = True
End If
Next
End Sub
Danke für freundlichen Tipp!
Gruß Horst