10
Zeilen dynamisch ausblenden
Hallo Admins!
Ich habe hier eine Liste, und komme nicht weiter, vielleicht kann mir ja jemand von euch helfen?
Ich möchte Zeilen dynamisch ein und ausblenden.
Mit den Zeilen
sind die Zeilen fix vorgegeben. Meine Frage ist jetzt, ob ich das ganze dynamisch machen kann, indem ich einer Zelle einen fixen Name gebe, und dann die gesamte Zeile ausblenden kann. Vielleicht gibt es einen anderen, einfacheren Weg?
Ich bin für jede hilfreiche Antwort dankbar!
Gruß
Tollgemacht
Ich habe hier eine Liste, und komme nicht weiter, vielleicht kann mir ja jemand von euch helfen?
Ich möchte Zeilen dynamisch ein und ausblenden.
Mit den Zeilen
Private Sub CheckBox1_Click()
Dim Bereich
Set Bereich = Worksheets("Übersicht").Rows("3:24")
Bereich.Hidden = True = Not (Bereich.Hidden)
End SubIch bin für jede hilfreiche Antwort dankbar!
Gruß
Tollgemacht
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 310221
Url: https://administrator.de/contentid/310221
Printed on: April 19, 2024 at 15:04 o'clock
10 Comments
Latest comment
Range("YourName").EntireRow.Hidden = True Regards
I've an overview sheet with lots of Check Boxes.
With each Check Box i can show and hide rows. In the hidden areas are more buttons.
Atm im using this code
But if i want to add a row before 203 the makro wont work, cause i specify Rows("203:224")
I want to add a row in 200 and the Makro should hide and show the same Buttons like before. I think its called dynamic.
Regards
With each Check Box i can show and hide rows. In the hidden areas are more buttons.
Atm im using this code
Private Sub CheckBox1_Click()
Dim Bereich
Set Bereich = Worksheets("Übersicht").Rows("203:224")
Bereich.Hidden = True = Not (Bereich.Hidden)
End SubI want to add a row in 200 and the Makro should hide and show the same Buttons like before. I think its called dynamic.
Regards
Then, the above is right for you. Give one cell or the range a name then use the above to hide it.
Hallo Tollgemacht, Willkommen auf Administrator.de!
Du kannst auch die aktuelle Position der Checkbox ermitteln indem du die Eigenschaft TopLeftCell der jeweiligen Checkbox als Indikator nimmst und dann einen Offset benutzt welche Zeilen ausgeblendet werden sollen. Dann ist es egal ob du Zeilen dazwischen einfügst.
Hier ein Beispielsheet
toggle_hide_show_ranges_310221.xlsm
Grüße Uwe
Du kannst auch die aktuelle Position der Checkbox ermitteln indem du die Eigenschaft TopLeftCell der jeweiligen Checkbox als Indikator nimmst und dann einen Offset benutzt welche Zeilen ausgeblendet werden sollen. Dann ist es egal ob du Zeilen dazwischen einfügst.
Hier ein Beispielsheet
toggle_hide_show_ranges_310221.xlsm
Grüße Uwe
1
Danke!
Thank you!
Unfortunately there's another problem i cant solve...
How can i convert the code
to a dynamic one?
How can i convert the code
ActiveWindow.ScrollRow = 3
Du musst uns schon erzählen anhand welchen Merkmals du wohin scrollen willst 
!
Du kannst die Row-Position jedes Range-Objects mit dessen Eigenschaft Row ermitteln. und dann ScrollRow zuweisen.
z.B. anhand der Position einer Checkbox
!Du kannst die Row-Position jedes Range-Objects mit dessen Eigenschaft Row ermitteln. und dann ScrollRow zuweisen.
z.B. anhand der Position einer Checkbox
ActiveWindow.ScrollRow = CheckBox1.TopLeftCell.Row
Mein Fehler, habe kaum eine Ahnung, wie du sicher schon festgestellt hast...
Das Merkmal ist eine Zelle mit einem definierten Namen.
Das Merkmal ist eine Zelle mit einem definierten Namen.
Dann
Hier mal ein bißchen was zu Lesen zum Thema 
Range-Objekt
ActiveWindow.ScrollRow = Range("Bereichsname").Row Range-Objekt
