VBA Problem bei Zeilen ausblenden
Lorenz
Leider funktioniert der untenstehende Code nur wenn nach Zeile 97 alle Zeilen eingeblendet sind.
Ich habe aber ab Zeile 98 alle Zeilen ausgeblendet.
if Target.Row >= 14 Then
iZ = Target.Row + 1
With Range(Cells(iZ, 1), Cells(97, 1))
.EntireRow.Hidden = True
End With
End If
Fehlermeldung: die hidden Eigenschaft kann nicht festgelegt werden (fehler 1004)
Wie muß der Code umfunktioniert werden, daß dieser Makro auch bei ausgeblendete Zeilen funzt?
Gruß
Lorenz
Anzeige