Live-Forum - Die aktuellen Beiträge

Datum

Titel

20.04.2024 00:49:19

Excel Sheet in einen Excel Kalender einfügen

20.04.2024 00:08:11

In Ordner nur das Speichern von Dateien erlauben

19.04.2024 21:26:15

mehrfache Texte finden

19.04.2024 19:41:34

Bei VBA Ausführung Anzeige einfrieren

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

128to132

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

UF-Combobox mit Werten aus versteckter Tabelle fül

Forumthread: UF-Combobox mit Werten aus versteckter Tabelle fül
2 Beiträge zu diesem Forumthread
Anzeige
315 Threads zu ähnlichen Themen
Top 100 Forumthreads

18.06.2002 20:57:35

Rainer Quaas

Hallo Excel User,

eine Userform-Combobox wird mit Werten aus Tabelle1 gefüllt.

Nun möchte ich aber, dass Tabelle1 nicht angezeigt wird. Daher verwende ich in der Workbook_Open-Prozedur:

Worksheets("Tabelle1").Visible = xlVeryHidden

Ergebnis: Das Tabellenblatt Tabelle1 wird korrekt ausgeblendet, nur wird jetzt in meiner Userform-Combobox nichts mehr angezeigt.

Wie kann man auf die Daten des versteckten Tabellenblattes zugreifen, oder welche andere Möglichkeit gibt es die Daten nur in der Userform-Combobox anzuzeigen?

Mein Ansatz sieht folgendermaßen aus:

Application.ScreenUpdating = False
Worksheets("Tabelle1").Visible = True
beliebiger Code
Worksheets("Tabelle1").Visible = xlVeryHidden
Application.ScreenUpdating = True

Bloß, welchem Ereignis muß ich das zuordnen?

Gruß Rainer

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: UF-Combobox mit Werten aus versteckter Tabelle fül

18.06.2002 23:01:25

Ramses
Re: UF-Combobox mit Werten aus versteckter Tabelle fül

19.06.2002 16:13:00

Rainer Quaas

Re: UF-Combobox mit Werten aus versteckter Tabelle fül

18.06.2002 23:01:25

Ramses

Hallo Namensvetter,

wenn du in der Combobox die Row-Source auf die ausgeblendete Tabelle gesetzt hast, funktioniert es tatsächlich nicht.

ein Workaround:

Blende die Tabelle temporär ein:

Aplication.ScreenUpdating = False
DeineTabelle.Visible = true

Jetzt kannst du auf den Bereich zugreifen und mit

Me.ComboBox1.AddItem(Range("A1"))
Me.ComboBox1.AddItem(Range("A2"))
Me.ComboBox1.AddItem(Range("A3"))

oder

For i = 1 to 3
Me.ComboBox1.AddItem(cells(i,1))
Next i

die Combobox füllen und anschliessend die Tabelle wieder mit xlVeryHidden wieder ausblenden und mit

Application.ScreenUpdating = True

die Bildschirmaktualisierung wieder einschalten. So kriegt der User nichts mit wie du die ComboBox füllst.

Private Sub Userform1_Initialize()
Application.ScreenUpdating = False
Worksheets("Deine Tabelle").Visible = True
'mit 3 Werten füllen
For i = 1 to 3
Me.ComboBox1.AddItem(cells(i,1))
Next i
Worksheets("Deine Tabelle").Visible = xlVeryHidden
Application.ScreenUpdating = True
End Sub