Alle ausgeblendeten Zeilen einblenden (VBA)


Alle ausgeblendeten Zeilen einblenden (VBA)

Alle ausgeblendeten Zeilen mit VBA wieder einblenden

Mit dem folgenden Makro können Sie alle ausgeblendeten Zeilen eines Tabellenblattes automatisch einblenden:

 

Sub AlleAusgeblendetenZeilenAnzeigen()

Dim r As Variant

For Each r In ActiveSheet.UsedRange.Rows

If r.Hidden = True Then r.Hidden = False

Next r

End Sub