06.04.2015, 19:03
Hallo und frohe Ostern,
ich bin gerade noch ein wenig am Programmieren und bin auch ein kleines Problem gestoßen, vielleicht könnt ihr mir ja schnell weiterhelfen.
Und zwar blende ich in meiner Mappe mehrere Zeilen ein und aus.
Das mache ich über diese Zeilen
Einblenden:
Rows("71:72").Hidden = False
Ausblenden
Rows("73:80").Hidden = True
Jetzt möchte ich aber die Zeilen nur einblenden, wenn ihn diesen auch etwas steht. Dies habe ich so versucht umzusetzen:
Leider klappt dies nicht so ganz. Wisst ihr wo der Fehler liegt?
Vielen vielen Dank
Deggit
ich bin gerade noch ein wenig am Programmieren und bin auch ein kleines Problem gestoßen, vielleicht könnt ihr mir ja schnell weiterhelfen.
Und zwar blende ich in meiner Mappe mehrere Zeilen ein und aus.
Das mache ich über diese Zeilen
Einblenden:
Rows("71:72").Hidden = False
Ausblenden
Rows("73:80").Hidden = True
Jetzt möchte ich aber die Zeilen nur einblenden, wenn ihn diesen auch etwas steht. Dies habe ich so versucht umzusetzen:
Code:
Sub B1_Down3()
Set WS4 = Worksheets("3. Schritt - Bedrohungen")
Dim Tabellentiefe As Long
Tabellentiefe = WS4.Range("C82").End(xlDown).Row
Rows("81:Tabellentiefe").Hidden = False
Rows("Tabellentiefe+1:182").Hidden = True
End Sub
Leider klappt dies nicht so ganz. Wisst ihr wo der Fehler liegt?
Vielen vielen Dank
Deggit