Erstmal ein gesundes neues Jahr.
Ich hab eine tabelle die von a1 bis u3077 geht.
in spalte D werden unregelmässig werte eingetragen
gibt es die Möglichkeit, wenn D leer dann zeile ausblenden ?
Sub t()
Dim a As Long
Application.ScreenUpdating = False
For a = 3077 To 1 Step -1
If Cells(a, 4).Value = "" Then Rows(a).Hidden = True
Next a
Application.ScreenUpdating = True
End Sub