Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
436to440
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
436to440
436to440
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Abfrage - nur bestimmte Tabellenblätter anzeigen

Abfrage - nur bestimmte Tabellenblätter anzeigen
08.06.2004 11:00:27
Andre
Ich habe eine sehr umfangreiche Excel-Datei. Beim öffnen soll per Kontrollkästchen etwas ausgewählt werden. Diese Auswahl soll dzu führen, dass nur bestimmte Tabellenblätter sichtbar sind. Die anderen sollen ausgeblendet werden.
Kann mir da jemand helfen? Ich bin schon am verzweifeln. Vielen Dank

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Abfrage - nur bestimmte Tabellenblätter anzeigen
08.06.2004 12:01:49
ANdreas
Hallo Andre,
beim Öffnen der Datei, wird eine UserForm eingeblendet.
Den Code dazu trägst Du in "DieseArbeitsmappe" ein:

Private Sub Workbook_Open()
Load UserForm1
UserForm1.Show
End Sub

So dann fügst Du eine neue UserForm ein. Darauf platzierst Du eine ListBox und einen CommandButton (optional über die ListBox noch ein Label mit dem Text "Auszublendene Blätter") und gibst folgenden Code für die UserForm ein:

Private Sub CommandButton1_Click()
Dim i%, j%
j = 0
For i = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(i) = True Then
j = j + 1 'Merker für Anzahl ausgeblendete Sheets (1 muss mind. eingeblendet bleiben)
If j < ThisWorkbook.Sheets.Count Then _
Sheets(i + 1).Visible = xlSheetHidden
End If
Next i
Unload Me
End Sub



Private Sub UserForm_Initialize()
Dim i%
For i = 1 To ThisWorkbook.Sheets.Count
ListBox1.AddItem ThisWorkbook.Sheets(i).Name
Sheets(i).Visible = xlSheetVisible
Next i
ListBox1.Height = 200
ListBox1.MultiSelect = fmMultiSelectMulti
End Sub

Damit werden bei jedem Öffnen alle Blätter eingeblendet und in die Listbox übernommen. Alle Blätter, die man nun in der Listbox auswählt (MultiSelect ist an), werden mit Klick auf die Schaltfläche ausgeblendet.
Hoffe das hilft weiter,
Andreas
Anzeige
AW: Abfrage - nur bestimmte Tabellenblätter anzeigen
08.06.2004 12:24:01
Andre
Hallo Andreas,
deine Beschreibung ist super. Ich habe schon alles eingebaut und es funktioniert alles bestens.
Vielen Dank
Andre

323 Forumthreads zu ähnlichen Themen

Monatstage eines Zeitraums auflisten
Gerhard

Hallo zusammen,
in einer Tabelle möchte ich zu verschiedenen Anfangs- und Enddatums (-tümer?) die Anzahl der relevanten Tage je Monat berechnen. Wer kann mir bitte die Formeln anpassen? Die Lösung für nur einen Zeitraum in eine Zeile habe ich bereits gefunden, aber die Anpassung auf mehrere...
13.04.2009 15:52:33
Thread-ID: 1068474
14 Beiträge
Anzeige
Fortlaufende Integer-Zahl mittels Zeit & Datum?
Dennis

Hallo Forum,
ich benötige für viele kleine Prozesse eine fortlaufende 8-stellige Integer-Zahl. Dazu wollte ich in der Auto_open() das Datum und die Zeit zu Hilfe nehmen, damit sich die Zahl ganz sicher nicht wiederholt und dann bei jedem Prozess, der eine neue ID verlangt, die Zahl um 1 erh...
25.05.2009 10:59:30
Thread-ID: 1077099
11 Beiträge
Combobox nur bestimmte Inhalte anzeigen
k

Hallo und einen wundervollen Guten Morgen ;o)
...ich habe mal wieder eine Frage (auch wenn ich hier shcon viel gelernt habe in den letzten Wochen !).
Habe in einer Userform eine Combobox (CB1) und diese zeigt alle Kundennamen einer Gesamtliste (Tabelle1) an. Jeder Kundensatz in der Tabe...
23.07.2009 09:28:23
Thread-ID: 1090694
3 Beiträge
Anzeige
Einzelne Wochentage aus Zellen mit Datum zählen
Karli

Hallo,
ich habe, um die Anzahl der einzelnen Wochentage in einer Spalte mit Datumangaben zu ermitteln, die Daten in einer anderen Spalte in Text umgewandelt, und dann Montage, Dienstage usw. gezählt.
Gibt es dafür auch einen direkten Weg die Summe bzw. Anzahl der einzelnen Wochentage in...
14.12.2009 21:03:03
Thread-ID: 1123898
6 Beiträge
Tage eines Monats suchen und die Summe bilden
Eva-Maria

Hallo zusammen,
Vielleicht hat jemand zeit und kann mir helfen, trotz WM ;o)
Damit ich meine Gutscheine unter kontrolle habe benötige ich die Summe vom Monat Jan, Feb......
Ich trage das Datum ein an dem ich einen Gutschein verkaufe. Die Gutscheine sind für drei Möglichkeiten untert...
21.06.2010 23:28:45
Thread-ID: 1163292
15 Beiträge
Anzahl Daten eines bestimmten Zeitraumes ermitteln
Frank

Hallo zusammen
Ich möchte gerne mittels einer Userform eine Abfrage starten, die eine Anzahl bestimmter Vorgaben zählen soll.
Also mittels combobox wird eine Aktion ausgewählt. In zwei Textboxen werden die Datumsangaben eingegeben (von - bis) und in einer dritten Textbox soll dann über...
31.10.2010 16:56:06
Thread-ID: 1184602
3 Beiträge
Nur bestimmte Werte in Combobox anzeigen lassen
Josef

Hallo!
Ich habe in einer Userform 2 ComboBoxen.
In die ComboBox1 werden die Werte aus der Tabelle1, Spalte H eingelesen.
In der ComboBox2 werden die Werte aus der Tabelle2, Spalte H eingelesen. Die Werte in der Tabelle2, Spalte H gibt es auch in der Tabelle1, Spalte H. Es kommt jed...
01.08.2011 09:11:29
Thread-ID: 1224430
4 Beiträge
Erste Montag in KW1 im Jahr
Andre´

Hallo alle zusammen,
ich suche eine Formel, die mir den ersten Montag in KW1 eines Jahres wiedergibt.
im nachfolgenden Bsp. habe ich manuell im Bereich C3:C7 das Datum eingeben, was errechnet werden soll.
Tabelle1

 ABC2 Erste Montag im JahrErste Montag in KW1 im Ja...
17.02.2012 16:25:12
Thread-ID: 1251201
5 Beiträge
Anzeige

Links zu Excel-Dialogen

ListBox UserForm

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
13
3
10
2
6
5
14
2
3
4
6
5
4
2
1
1
8
7
8
3
3
7
6
6
6