Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.06.2025 22:11:12
24.06.2025 21:29:43
24.06.2025 19:48:50
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: ein-/ausblenden zeilen per button

ein-/ausblenden zeilen per button
04.04.2005 14:30:55
lemon
hallo freunde,
ich habe eine file, welche monat "januar" bis "dezember" auflistet (in einer spalte, z.b. "a1 = januar"). unter jedem monat (also z.b. ab "a2") stehen dann informationen in den zeilen, bis dann irgendwann der naechste monat kommt.
nun blende ich diese zeilen oft aus, damit ich nur die zeilen der monate habe und wuerde dies gerne automatieren. z.b. duch einen button vor jedem monat (z.b. vor "a1") sollte man jenen einzelnen monat aufklicken koennen, oder oben ueber allen monaten hat man z.b. 2 buttons (z.b. status 1 und status 2), mit welchen man die kompletten monate auf einmal "zu" oder "auf" machen kann.
ich hoffe ihr habt mein problem verstanden. ich persoenlich habe zu wenig erfahrung in excel um die gewuenschte funktion einbauen zu koennen.
koennt ihr mir weiterhelfen?
mfg und vielen dank, lemoncoke.
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ein-/ausblenden zeilen per button
04.04.2005 14:44:33
Tobias
Servus!
Fuege einen Commandbutton ein (sinnigerweise _nicht_ in der Spalte, die du ausblenden moechtest) und fuege diesen Code hinzu:

Columns("A:A").Select
Selection.EntireColumn.Hidden = True

Fast dasselbe, ums wieder sichtbar zu machen (einen zweiten Commandbutton hinzufuegen):

Columns("A:A").Select
Selection.EntireColumn.Hidden = False

Gruss

Tobias
Anzeige
AW: ein-/ausblenden zeilen per button
04.04.2005 14:49:55
Hajo_Zi
Hallo Tobias,
zu 99% kann in VBA auf select usw. verzichtet werden. In Deinem Falle auf
.Select
Selection.
es ginge auch über nur einen Schalter
Columns("A:A").EntireColumn.Hidden = Not Columns("A:A").EntireColumn.Hidden
Gruß Hajo
AW: ein-/ausblenden zeilen per button
04.04.2005 14:54:21
Tobias
Servus Hajo!
Ich hab schon oefters deine Beitraege gelesen und auch, dass zu 99% auf Select verzichtet werden kann. Leider ist mein VBA noch nicht so weit herangereift, dass _ich_ darauf verzichten koennte, ohne meinen strukturierten Ueberblick zu verlieren. Ich denke mal, dass sich das mit der Zeit von selbst einstellt, aber im Moment komme ich ohne dieses explizite "Select" einfach noch nicht klar, da es fuer mich einfach zur besseren Lesbarkeit beitraegt.
Klar, die Performance ist bei mehr Sourcecode geringer, aber funktionieren tuts allemal, und bei diesem simplen Beispiel kommt es auf eine Millisekunde imho nicht an.

Gruss

Tobias
Anzeige
AW: ein-/ausblenden zeilen per button
04.04.2005 15:02:14
lemon
hallo und danke fuer eure schnelle antwort.
leider habe ich noch einige fragen...
ich moechte ja keine spalten, sondern zeilen ausblenden - dies geht wahrscheinlich aehnlich und ich muss das A.A nur durch irgendwas austauschen, oder?
z.b.
zeile A5 bis A15 soll geoeffent werden oder halt geschlossen. das bloede hierbei ist jedoch, das diese zeilen variabel sind - mal hat ein monat naemlich weniger, oder mal mehr eintraege.
dankeschoen, lemoncoke
Anzeige
AW: ein-/ausblenden zeilen per button
04.04.2005 15:10:17
Hajo_Zi
Hallo Lemon
Rows(1).EntireRow.Hidden = Not Rows(1).EntireRow.Hidden
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.
AW: ein-/ausblenden zeilen per button
04.04.2005 15:08:37
Hajo_Zi
Hallo Tobias,
Du hattest in Off Topic einen Beitrag geschrieben, dazu das Du Antworten gibt. Mein Beitrag war nur als Hinweis gedacht. iCh habe auch mit select angefangen. Man wird es nur wieder schwer los, wenn man sich erst dran gewöhnt hat.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.
Anzeige
AW: ein-/ausblenden zeilen per button
04.04.2005 15:10:39
Tobias
Servus Hajo,
ich werd versuchen, das Select loszuwerden, sobald ich es kann! :-)

Gruss

Tobias
AW: ein-/ausblenden zeilen per button
04.04.2005 14:51:21
Andi
Hi,
das macht dann bei 12 Monaten 24 Knöpfe.
Geht aber auch - für meinem Geschmack ein bisschen übersichtlicher - mit einer CheckBox pro Monat (und ohne select... :-)):

Private Sub CheckBox1_Click()
Select Case CheckBox1.Value
Case True
Columns("A:A").EntireColumn.Hidden = False
Case False
Columns("A:A").EntireColumn.Hidden = True
End Select
End Sub

Schönen Gruß,
Andi
Anzeige
AW: ein-/ausblenden zeilen per button
04.04.2005 15:09:29
Ceyser
Hi,
vielleicht würde es einfach genügen die Zeilen zu grupieren.
Etwa so: https://www.herber.de/bbs/user/20667.xls
Einfach die auszublenden Zeilen markieren und dann Daten/Gruppierung und Gliederung/Gruppierung
wählen.
Wegen der Übersichtlichkeit habe ich eine Leerzeile vor jedem Monat gelassen.
Gruß
CS
Anzeige
AW: ein-/ausblenden zeilen per button
04.04.2005 15:27:39
Lemon
hallo Ceyser Soze,
genau SO habe ich mir das vorgestellt.
doch wie hast du das gemacht? also.....wie soll ich mich ausdruecken (..ohne das wissen zu haben..)...z.b. dieser graue lange hintergrund der bis unten geht, kommt das automatisch? und dazu nur die kleinen buttons, mit diesem zieheffekt wenn man es oeffnet.
mhm, ich weiß nur eines: das ist die loesung, aber wie ich das mache - weiß ich noch nicht so recht.
ich werde es mir auf jeden fall naeher und intensiver betrachten, ich muss nun jetzt leider in ein meeting und werde es mir spaetestens heute abend/morgen angucken.
ich danke euch!
lemoncoke
Anzeige
AW: ein-/ausblenden zeilen per button
04.04.2005 15:16:45
Rob
Hi Lemoncoke,
du kommst komplett ohne VBA aus - auch wenn ich mir jetzt den Unbill aller VBA Freaks zuziehe ;-)
Machs doch über benutzdefinierbare Ansichten: zieh dir den Menübefehl direkt in die Menüleiste, dann hast du´s auf Knopfdruck. Lass alle Zeilen/Spalte eingeblendet - speichere die Ansicht unter z.B. "ALLES", blende die Spalten/Zeilen aus die du nicht benötigst, speichere unter entsprechenden Namen. Im Feld "Benutzerdefinierte Ansicht" kannst dann simpel auswählen...
oder
mach´s mit Gruppierungen....
Viel Spaß
LG
Rob
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Zeilen und Spalten in Excel per Button ein- und ausblenden


Schritt-für-Schritt-Anleitung

  1. Öffne Excel und lade die Datei, in der Du Zeilen oder Spalten ausblenden möchtest.

  2. Füge einen Button hinzu:

    • Gehe zu Entwicklertools > Einfügen > Button (Formularsteuerelement).
    • Platziere den Button an der gewünschten Stelle in Deinem Arbeitsblatt.
  3. Zuweisen eines Makros:

    • Klicke mit der rechten Maustaste auf den Button und wähle Makro zuweisen.
    • Erstelle ein neues Makro oder wähle ein vorhandenes aus.
  4. Code zum Ausblenden von Zeilen einfügen:

    • Um Zeilen auszublenden, füge folgenden VBA-Code hinzu:
      Sub ZeilenAusblenden()
       Rows("2:10").EntireRow.Hidden = True
      End Sub
    • Um die Zeilen wieder einzublenden, verwende:
      Sub ZeilenEinblenden()
       Rows("2:10").EntireRow.Hidden = False
      End Sub
  5. Wiederhole den Vorgang für Spalten, falls notwendig. Verwendung von Columns("A:A").EntireColumn.Hidden = True für das Ausblenden von Spalten.


Häufige Fehler und Lösungen

  • Fehler: Button funktioniert nicht.

    • Lösung: Stelle sicher, dass das Makro korrekt zugewiesen ist und die VBA-Syntax richtig ist.
  • Fehler: Zeilen werden nicht ausgeblendet.

    • Lösung: Überprüfe, ob die Zeilen- oder Spaltennummern im Code korrekt angegeben sind.
  • Fehler: Keine Änderungen sichtbar.

    • Lösung: Möglicherweise müssen die Excel-Einstellungen für Makros angepasst werden, um sie auszuführen.

Alternative Methoden

  • Gruppierung verwenden: Du kannst Zeilen oder Spalten gruppieren, um sie einfach ein- und auszublenden. Dies geht über Daten > Gruppierung.

  • Benutzerdefinierte Ansichten: Speichere verschiedene Ansichten Deiner Datei (mit ein- und ausgeblendeten Zeilen) und wechsle zwischen ihnen über Ansicht > Benutzerdefinierte Ansichten.

  • Checkboxen: Verwende Checkboxen für jeden Monat, um Zeilen aus- und einzublenden. Beispiel:

    Private Sub CheckBox1_Click()
      Rows("2:10").EntireRow.Hidden = Not Rows("2:10").EntireRow.Hidden
    End Sub

Praktische Beispiele

  • Beispiel für das Ausblenden mit einem Button: Erstelle zwei Buttons – einen zum Ausblenden und einen zum Einblenden. Nutze den oben genannten VBA-Code für beide Buttons.

  • Alternatives Beispiel: Wenn Du eine monatliche Übersicht hast, kannst Du Buttons für jeden Monat anlegen, um die jeweiligen Zeilen für den Monat sichtbar oder unsichtbar zu machen.


Tipps für Profis

  • Vermeide .Select und .Selection: Reduziere den Code und verbessere die Leistung, indem Du direkt auf die Objekte zugreifst.

  • VBA-Fehlerbehandlung: Implementiere Fehlerbehandlung im VBA-Code, um unerwartete Fehler zu vermeiden.

  • Dokumentiere Deinen Code: Schreibe Kommentare in Deinen VBA-Code, um die Lesbarkeit zu erhöhen und die Wartung zu erleichtern.


FAQ: Häufige Fragen

1. Wie kann ich mehrere Zeilen auf einmal ausblenden?
Du kannst den Befehl Rows("2:10").EntireRow.Hidden = True verwenden, um eine Reihe von Zeilen auf einmal auszublenden.

2. Gibt es eine Möglichkeit, mit einem Button die Sichtbarkeit von Spalten zu steuern?
Ja, nutze den Code Columns("A:A").EntireColumn.Hidden = Not Columns("A:A").EntireColumn.Hidden, um die Sichtbarkeit von Spalten per Button zu toggeln.

3. Kann ich die Buttons anpassen?
Ja, Du kannst die Schaltflächen über die Formatierungsoptionen anpassen, um die Benutzeroberfläche zu verbessern.

4. Welche Excel-Version benötige ich für diese Funktionen?
Die beschriebenen Funktionen sind in Excel 2007 und höheren Versionen verfügbar.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige