Zellen ausblenden funktioniert nur teilweise
Markus
das folgende Makro blenden Zeilen aus, wenn der Wert in Spalte A (A1:20) leer ist.
Leider werden die Zeilen nicht ausblendet, wenn eine Formel drinn steckt.
z.B. in Zelle A10 steckt folgende Formel: =Tabelle1!A211.
Wenn dieser Wert 0 oder "" oder blank ist, soll die Zeile ausblendet werden.
Markus
Sub Ausblenden()
Dim c As Range
Dim Wert1 As String
Wert1 = ""
For Each c In Range("A1:A20")
If c.Value = Wert1 Then
c.EntireRow.Hidden = True
End If
Next c
End Sub
Anzeige