Namen für Zeilen deklarieren und verwenden in VBA

[Yaslaw]

ggf ActiveSheet durch das Sheet ersetzen das gemeint ist

 

[joburg]

Ich habe bereits ActiveSheet verwendet:
ActiveSheet.Rows(Range("System1").Row).Hidden = False

 

[Yaslaw]

Jepp. Ersetze es durch das Sheet auf dem die Zeilen ausgeblendet werden sollen. Im restlichen Code arbeitest du auch mit benammsten Sheets

 

[joburg]

OK, jetzt sagt er mir 'Die Methode 'Range' für das Objekt '_Worksheet' ist fehlgeschlagen'
und markiert nach dem Debuggen folgendes gelb:
Worksheets("Angaben").Rows(Range("System1").Row).Hidden = False

 

[joburg]

Im obigen Fall nutze ich auch ActiveSheet statt Worksheet("Angaben") und es funktioniert.

 

[joburg]

Kann mir jemand helfen?

 

[Zvoni]

Worksheets("Angaben").Range("System1").Rows.Hidden=False
geht auch nicht?

 

[joburg]

Es funktioniert nicht. Er zeigt an "Anwendungs- oder objektorientierter Fehler".
Ich habe eine andere Datei, wo das auch möglich ist nur leider muss ich ein Passwort eingeben, wenn ich den VBA-Code sehen möchte.

Also es funktioniert zumindest. Aber wie?

 

[Zvoni]

Dann hast du woanderst einen Bock drin.

Habe bei mir eben mit Phantasiedaten ein Excelblatt gefüllt, Zeile 5 bis 10 den Namen "Test" gegeben mit

Worksheets("Tabelle1").Rows("5:10").Name = "Test"

und dann mit

Worksheets("Tabelle1").Range("Test").Rows.Hidden = True

erfolgreich die Zeilen versteckt