Clever-Excel-Forum

Normale Version: Makro erweitern
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hey,
ich glaube für die meisten eine Kleinigkeit aber ich schaffe es gerade irgendwie nicht. Habe folgendes Makro welches die Zeile ausblendet, in der die Spalte B leer ist. Nun hätte ich das ganze gerne auch. bzw erweitert, dass wenn B und D leer sind bitte die Zeile ausblenden.

Code:
Sub Makro6()

Dim rng As Range
Application.ScreenUpdating = False
For Each rng In Range("B9:B36")
   If rng.Value = "" And rng.Offset(0, 1).Value = "" Then
       Rows(rng.Row).EntireRow.Hidden = True
   End If
Next
Application.ScreenUpdating = True

End Sub
Hi

Offset(0,2)

Gruß Elex
simple as this  Sleepy  thx