Supportnet / Forum / Tabellenkalkulation
untermenues
Frage
Ich habe mal eine Excel-Tabelle gesen in der man Unterpunkt aufklappen konnte.
Bsp.:
Zeile 1
Zeile 2
Zeile 5
Zeile 6
Bei Zeile 2 konnte man dann klicken und die Zeilen 3 und 4 damit öffnen. Diese sollen Zusätze zu Zeile 2 enthalten.
Ich hoffe ich habe das jetzt einigermaßen verständlich beschrieben.
Wie kann man das realisieren?
MfG
EA
Antwort 1 von coros
Hi EA,
kopiere nachfolgenden VBA Code in das VBA Projekt der Tabelle, in dem die Zeile 3 und 4 aus- bzw. eingeblendet werden sollen.
Bei dem Code werden die Zeilen 3 und 4 eingeblendet, wenn in Zeile 2 irgend eine Zelle angeklickt wird. Ansonsten bleiben die beiden Zeilen ausgeblendet.
Wenn Du Dich mit VBA nicht auskennst, dann schau mal auf meiner HP nach. Dort findest Du in der Rubrik Anleitungen und dann Anleitung zum VBA Projekt “Tabelle" eine bebilderte Anleitung, die Dir behilflich sein sollte.
Ich hoffe, Du kommst kalr. Bei Fragen oder Problemen melde Dich wieder.
MfG,
coros
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
kopiere nachfolgenden VBA Code in das VBA Projekt der Tabelle, in dem die Zeile 3 und 4 aus- bzw. eingeblendet werden sollen.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row = 2 Then
Rows("3:4").EntireRow.Hidden = False
Else
Rows("3:4").EntireRow.Hidden = True
End If
End SubBei dem Code werden die Zeilen 3 und 4 eingeblendet, wenn in Zeile 2 irgend eine Zelle angeklickt wird. Ansonsten bleiben die beiden Zeilen ausgeblendet.
Wenn Du Dich mit VBA nicht auskennst, dann schau mal auf meiner HP nach. Dort findest Du in der Rubrik Anleitungen und dann Anleitung zum VBA Projekt “Tabelle" eine bebilderte Anleitung, die Dir behilflich sein sollte.
Ich hoffe, Du kommst kalr. Bei Fragen oder Problemen melde Dich wieder.
MfG,
coros
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 2 von Excelanfänger
Uh, das kling kompliziert. Ich werde es mal versuchen
Danke für die schnelle Antwort
EA
Danke für die schnelle Antwort
EA

