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

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

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

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

Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige