Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
876to880
876to880
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Toggle-Button Zeilen Spalten ausblenden

Forumthread: Toggle-Button Zeilen Spalten ausblenden

Toggle-Button Zeilen Spalten ausblenden
08.06.2007 13:22:26
Wrobel
Hallo Leute,
ich bin nicht so der VBA Profi, daher die Frage ob man per Toggle Button in den Tabellen 3 und 7 bis 34 die Spalten B,C,G,H,I,J und die Zeilen 7,8,9,10 aus und einblenden kann?
Falls noch Fragen sein sollten bitte ich um Feedback.
Schönen Gruß aus SH
Wrobel

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Toggle-Button Zeilen Spalten ausblenden
08.06.2007 13:41:00
Matthias
Hallo Wrobel,

Private Sub ToggleButton1_Click()
Dim sh As Worksheet
Dim hid As Boolean
hid = ToggleButton1.Value
For Each sh In ThisWorkbook.Worksheets
With sh
If .Index = 3 Or (.Index >= 7 And .Index


Gruß Matthias

AW: Toggle-Button Zeilen Spalten ausblenden
08.06.2007 16:23:52
Wrobel
Hallo Matthias,
danke für deine Antwort!
Hatte ich zwar vorher nicht gesagt, aber kann auch auf dem Button die Begriffe "Sichtbar" und "Unsichtbar" - wenn die Spalten und Zeilen verschwunden sind - vermerken?
Gruß
Wrobel aus SH

Anzeige
AW: Toggle-Button Zeilen Spalten ausblenden
08.06.2007 21:02:43
Matthias
Hallo Wrobel,
füge nach der Zeile

hid = ToggleButton1.Value


einfach dies ein:


ToggleButton1.Caption = IIf(hid, "Unsichtbar", "Sichtbar")


Gruß Matthias

;

Forumthreads zu verwandten Themen

Zellen ausblenden mit Wert 0 in Zelle
Ulrich

Hallo zusammen,
wie kann ich einem Tabellenblatt alle Zeilen ausblenden, bei denen in der ersten Zelle eine 0 (null) steht? Geht sowas überhaupt?
Viele Grüße,
Ulrich
01.09.2008 11:08:49
Thread-ID: 1006360
6 Beiträge
Zeilen ausblenden per Button
Hanses

Hallo,
ich wiederhole mein Frage.
Ich möchte in einem geschützen Tabellenblatt, welches per Passwort freigegeben wird, per Button alle Zeilen ausblenden, wenn in Zelle der Spalte "C" kein Eintrag vorliegt.
Ich möchte keinen Autofilter einsetzen, da auch alle Menüs und die Spalten un...
11.09.2008 14:00:00
Thread-ID: 1009116
3 Beiträge
Register ein- und ausblenden
HaKa

Hallo Forum
Wie lautete der VBA-Code um z.B. das Register "Tabelle3" aus-, resp. wieder einzublenden?
Gruss Heinz
14.09.2008 15:40:00
Thread-ID: 1009597
5 Beiträge
Spalten ein und ausblenden
Marion65

Hallo zusammen, ich habe hier eine ExcelTabelle welche zum Ein- und Ausblenden der Spalten kleine + bzw. - Zeichen hat. Wie kann ich diese selber erstellen? Vielen Dank, Marion. https://www.herber.de/bbs/user/55401.xls
15.09.2008 20:09:56
Thread-ID: 1009885
4 Beiträge
Spalte auslesen und in eine neue schreiben
Andrej

Hallo,
ich sitz seit gestern an nem Excel Dokument und habe es schon mit Formeln versucht, aber das alles nicht das Wahre.
Gibt es eine Lösung bei der ich aus der Spalte C nach bestimmten Sachen suchen lassen, die ich immer vorgeb, wie z.b. XY oder AB und er mir auch der Vorgabe nach in...
19.11.2008 12:46:00
Thread-ID: 1025987
13 Beiträge
Zelleninhalt mit CommandButton in Textbox anzeigen
Markus

Hallo an alle!
Mein Makro kann bisher folgendes:
Per Klick auf 1 von 300 Comandbuttons wird der entsprechende Inhalt aus einer von 300 Zellen in eine Textbox geladen.
"Das funktioniert"
Nun möchte ich , nachdem ich einen Button gedrückt habe und der Inhalt in Textbox angezeigt w...
21.11.2008 11:05:00
Thread-ID: 1026664
2 Beiträge
VBA, Notiz ein- und wieder ausblenden
Burghard

Hallo ins Netz,
ich möchte mit Knopfdruck ein Textfeld (mit Inhalt, es existiert schon) oder ein Autoformat (z.B. Gefaltete Ecke) auf dem Blatt an einer bestimmten Stelle für 1 Minute plazieren und danach soll es wieder verschwinden. Also kopieren und dann automatisch die Kopie wieder lösc...
01.12.2008 09:08:18
Thread-ID: 1029158
2 Beiträge
Zeilen Ein. und Ausblenden
KayR

Hallo,
würde gerne folgendes realisieren, hab aber von VBA
kaum Ahnung.
Wenn Tabelle2!A8 = FALSCH, dann sollen in Tabelle1 die
Zeilen 8,9,10 ausgeblendet werden.
Wenn Tabelle2!A8 = WAHR, dann sollen die Zeilen 8,9,10
wieder eingeblendet werden.
Kann mir jemand bitte...
27.01.2009 20:09:00
Thread-ID: 1044366
6 Beiträge
Spalten ausblenden von - bis
-

Hallo an alle Cracks,
habe eine Beispieldatei angehängt. Ich würde gerne in den Zellen B1 und B2 als Eingabe für die Kalenderwochen definieren. z.B. ich gebe von KW 10 bis KW 15 anschließend werden alle Spalten ausgeblendet nur die sollen angezeigt werden in dem Interval von 10 - 15. Könnt...
20.02.2009 11:23:00
Thread-ID: 1052397
6 Beiträge
Ergebnis auslesen und in andere Spalte übertragen
Alex

Hallo,
Kann mir jemand bei folgendem Problem helfen:
Ich habe drei Spalten A, B, C.
In Spalte A steht in wenigen Zellen etwas drin und sehr viele Zellen sind leer. In Spalte B wird die Anzahl leerer Zellen der Spalte A gezählt und jedes Mal wenn in A etwas drin steht, beginnt er mit...
17.03.2009 08:16:28
Thread-ID: 1060992
5 Beiträge
Zeilen Ein und Ausblenden
TinoB

Hallo Excelgemeinde,
ich stehe gerade auf dem Schlauch und hoffe Ihr könnt mir helfen. Ich habe im Forum schon danach gesucht, nur leider komme ich nicht weiter. Ich möchte wenn in der Zelle B2 eine 1, 2 oder 3 steht die Zeile 18 ausblenden. Ansonsten soll diese eingeblendet werden oder zum...
23.03.2009 16:43:10
Thread-ID: 1062965
4 Beiträge
Spalte A und E aus allen Blätern zusammenkopieren
Mindjogger

Servus,
ich möchte aus einer Excel Datei aus allen darin enthaltenen Blättern jeweils die Spalte A und E in eine neue Excel Datei auf ein Sheet kopieren.
Oder noch genauer:
ich möchte aus einer Excel Datei aus allen darin enthaltenen Blättern jeweils ein Schlüsselwort (unique) als...
26.03.2009 17:01:20
Thread-ID: 1064329
4 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Toggle-Button zum Ein- und Ausblenden von Zeilen und Spalten in Excel

Schritt-für-Schritt-Anleitung

  1. Öffne Excel und gehe ins VBA-Editor:

    • Drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.

  2. Füge einen Toggle-Button hinzu:

    • Gehe auf das Menü Entwicklertools und wähle Einfügen > Toggle Button.

  3. Erstelle das VBA-Skript:

    • Doppelklicke auf den Toggle-Button und füge folgenden Code ein:
    Private Sub ToggleButton1_Click()
   Dim sh As Worksheet
   Dim hid As Boolean
   hid = ToggleButton1.Value
   For Each sh In ThisWorkbook.Worksheets
       With sh
           If .Index = 3 Or (.Index >= 7 And .Index <= 34) Then
               .Columns("B:C").EntireColumn.Hidden = hid
               .Columns("G:J").EntireColumn.Hidden = hid
               .Rows("7:10").EntireRow.Hidden = hid
               ToggleButton1.Caption = IIf(hid, "Unsichtbar", "Sichtbar")
           End If
       End With
   Next sh
End Sub

  4. Schließe den VBA-Editor:

    • Speichere deine Änderungen und gehe zurück zu Excel.

  5. Teste den Button:

    • Klicke auf den Toggle-Button und überprüfe, ob die Spalten und Zeilen wie gewünscht ein- und ausgeblendet werden.

Häufige Fehler und Lösungen

  • Spalten oder Zeilen verschwunden: Wenn die Spalten oder Zeilen nicht angezeigt werden, prüfe, ob die Indizes in der If-Abfrage korrekt sind. Stelle sicher, dass die Worksheet-Indizes den tatsächlichen Tabellenblättern entsprechen.

  • Toggle-Button funktioniert nicht: Überprüfe, ob der Button korrekt in das Arbeitsblatt eingefügt wurde und die Makros aktiviert sind.

Alternative Methoden

  • Verwendung von Schaltflächen: Anstelle eines Toggle-Buttons kannst du auch Schaltflächen verwenden, die beim Klicken die Sichtbarkeit von Zeilen und Spalten steuern. Der Code bleibt ähnlich, du musst jedoch eine andere Schaltflächenart wählen.

  • Gruppierung: Eine weitere Methode zum Ein- und Ausblenden von Spalten ist die Gruppierungsfunktion in Excel. Du kannst Spalten oder Zeilen gruppieren und dann die Gruppe mit einem Klick ein- oder ausblenden.

Praktische Beispiele

  • Spalten ausblenden: Wenn du die Spalten B und C ausblenden möchtest, kannst du dies im Code einfach anpassen:

    .Columns("B:C").EntireColumn.Hidden = True

  • Zeilen einblenden: Um Zeilen wieder sichtbar zu machen, setze Hidden auf False:

    .Rows("7:10").EntireRow.Hidden = False

Tipps für Profis

  • Makro zuweisen: Du kannst das Makro auch einer Schaltfläche auf dem Arbeitsblatt zuweisen, um die Benutzerfreundlichkeit zu erhöhen.

  • Fehlerbehandlung: Implementiere Fehlerbehandlungsroutinen im VBA-Code, um potenzielle Probleme elegant zu handhaben.

  • Benutzerfreundlichkeit: Stelle sicher, dass der Toggle-Button eine klare Beschriftung hat, z.B. „Sichtbar“ oder „Unsichtbar“, damit der Benutzer versteht, was der Button bewirken wird.

FAQ: Häufige Fragen

1. Wie kann ich mehrere Toggle-Buttons für verschiedene Zeilen und Spalten verwenden?
Du kannst für jeden Toggle-Button einen eigenen VBA-Code schreiben, der die spezifischen Zeilen und Spalten steuert.

2. Funktioniert das in allen Excel-Versionen?
Ja, das Skript sollte in den meisten modernen Excel-Versionen funktionieren, solange du VBA unterstützt.

3. Kann ich den Toggle-Button auch in einer Excel-Online-Version verwenden?
Leider wird VBA in Excel Online nicht unterstützt. Du müsstest auf eine Desktop-Version umsteigen.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige