Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

togglebutton zeilen ausblenden/einblenden

Forumthread: togglebutton zeilen ausblenden/einblenden

togglebutton zeilen ausblenden/einblenden
03.10.2005 17:39:00
Mola
Hallo,
könnte mir jemand sagen wie der code lauten muss, wenn ich mittels ToggleButton einen Bezug in meiner Tabelle ausblenden möchte?
Also zu Beispiel: Bei Klick blende die Zeilen 7-11 aus. Nochmal klick - wieder einblenden....
Sind die Zeilen eingeblendet soll auf dem Button "Menue ausblenden" stehen - sonst "Menue einblenden"!
Vielen herzlichen Dank!
Gruß
Mola
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: togglebutton zeilen ausblenden/einblenden
03.10.2005 17:48:36
Erich
hi versuchs mal damit;

Sub Schaltfläche1_BeiKlick()
Rows("7:11").Select
Selection.EntireRow.Hidden = True
End Sub

gruß erich
AW: togglebutton zeilen ausblenden/einblenden
03.10.2005 18:06:02
Luschi
Hallo Mola,
hier ist 1 kleimes Beispiel dazu:
https://www.herber.de/bbs/user/27163.xls
Gruß von luschi
aus klein-paris
Anzeige
VIELEN DANK
03.10.2005 18:09:55
Mola
Hallo,
vielen Dank für Eure schnelle Hilfe!!!
Grüße
Mola
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

ToggleButton zum Ausblenden und Einblenden von Zeilen in Excel


Schritt-für-Schritt-Anleitung

  1. Öffne Excel und erstelle ein neues Arbeitsblatt oder öffne ein bestehendes.
  2. Füge einen ToggleButton in dein Arbeitsblatt ein:
    • Gehe zu "Entwicklertools" > "Einfügen" und wähle den ToggleButton aus der Steuerungsliste.
  3. Klicke mit der rechten Maustaste auf den ToggleButton und wähle "Code anzeigen".
  4. Füge den folgenden VBA-Code ein:
Sub Schaltfläche1_BeiKlick()
    If Rows("7:11").Hidden Then
        Rows("7:11").Hidden = False
        ActiveSheet.Shapes("Schaltfläche1").TextFrame.Characters.Text = "Menü ausblenden"
    Else
        Rows("7:11").Hidden = True
        ActiveSheet.Shapes("Schaltfläche1").TextFrame.Characters.Text = "Menü einblenden"
    End If
End Sub
  1. Schließe den VBA-Editor und teste den ToggleButton, indem du auf ihn klickst. Die Zeilen 7-11 sollten nun ein- und ausgeblendet werden.

Häufige Fehler und Lösungen

  • Fehler: Der ToggleButton funktioniert nicht.

    • Stelle sicher, dass der Button mit dem richtigen VBA-Code verknüpft ist. Rechtsklicke auf den Button und wähle "Code anzeigen".
  • Fehler: Die Zeilen blenden sich nicht ein.

    • Überprüfe, ob die Zeilen tatsächlich verborgen sind. Manchmal kann es helfen, die Ansicht zu aktualisieren (z.B. durch Scrollen).

Alternative Methoden

Wenn du keine VBA-Programmierung verwenden möchtest, kannst du auch die "Gruppieren"-Funktion in Excel nutzen, um Zeilen ein- und auszublenden:

  1. Markiere die Zeilen 7-11.
  2. Gehe zu "Daten" > "Gruppieren".
  3. Du kannst nun das Plus- oder Minuszeichen neben den Zeilen verwenden, um sie ein- oder auszublenden.

Praktische Beispiele

Ein praktisches Beispiel für das Ausblenden von Zeilen könnte ein Bericht sein, bei dem du bestimmte Details nur bei Bedarf anzeigen möchtest. Mit dem "excel zeilen ein und ausblenden button" kannst du die Übersichtlichkeit deiner Daten verbessern, indem du irrelevante Informationen ausblendest.


Tipps für Profis

  • Nutze die Formatierung des ToggleButtons, um ihn hervorzuheben. Du kannst die Farben und den Text leicht anpassen.
  • Denke daran, andere Zeilen oder Spalten zu verstecken, indem du den Code entsprechend anpasst.
  • Experimentiere mit weiteren Steuerungselementen in Excel, wie z.B. Checkboxen oder Kombinationsfeldern, um interaktive Berichte zu erstellen.

FAQ: Häufige Fragen

1. Kann ich mehrere ToggleButtons für unterschiedliche Zeilen verwenden?
Ja, du kannst für jede Zeile oder Zeilengruppe einen eigenen ToggleButton erstellen und den entsprechenden VBA-Code anpassen.

2. Funktioniert das auch in Excel für Mac?
Die grundlegenden Funktionen sind ähnlich, aber die Benutzeroberfläche kann abweichen. Stelle sicher, dass du die Entwicklertools aktiviert hast.

3. Wie kann ich den Text auf dem Button ändern?
Im VBA-Code kannst du die Zeile mit ActiveSheet.Shapes("Schaltfläche1").TextFrame.Characters.Text anpassen, um den Button-Text zu ändern.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige