Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1012to1016
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
Inhaltsverzeichnis

Sheets - Prüfen wenn dann

Sheets - Prüfen wenn dann
08.10.2008 11:01:00
sockel939
Hallo !
Also ich habe 10 Sheets in einer Arbeitsmappe.
Diese können einzeln auf visible 0 oder visible 1 gesetzt werden uber Button.
Wenn ich jetzt aber z.B. 6 auf visible 1 und die anderen 4 auf visible 0 habe, und über meinen general Button alle noch offenen Schließen möchte hängt das Makro sich auf.

Private Sub CommandButton15_Click()
For Each Worksheet In ActiveWorkbook
Worksheet.Visible = 0
Next Worksheet
End Sub


Bin kein VBA ler könnt ihr mir helfen
Danke

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

Betreff
Datum
Anwender
Anzeige
AW: Sheets - Prüfen wenn dann
08.10.2008 11:06:16
Reinhard
Hi Sockel,
ein Blatt muß immer sichtbar bleiben.
Gruß
Reinhard
AW: Sheets - Prüfen wenn dann
08.10.2008 11:07:42
Hajo_Zi
Hallo Nick,
ich würde niemals als Varible einen Namen benutzen der ein VBA Befehl ist oder danach aussieht.
ich hätte auch In Worksheets geschrieben.

AW: Sheets - Prüfen wenn dann
08.10.2008 11:11:00
sockel939
Habs .....
Danke für die Aufmerksamkeit Hajo und Nick :o)
Dim InI As Integer
For InI = Sheets.Count To 1 Step -1
If Sheets(InI).Name "Wohin" Then Sheets(InI).Visible = xlHidden
Next InI
Bye
Anzeige

9 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige