Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 13:54:06
Multiplikation
16.04.2024 12:41:11
Vielleicht Onur ? Leider werden nicht alle Monate
16.04.2024 12:08:33
Zelle/Spalte bestimmten Wert in Kopfzeile zuordnen
16.04.2024 12:01:17
Dynamische Liste generiert aus mehreren Vorgagen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
144to148
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
144to148
144to148
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

UserForm

UserForm
10.08.2002 16:11:15
mandi
hallo
ich möchte über eine UserForm in einem listenfeld
excel dateien auflisten und und ansprechen können
die dateien befinden sich z.B auf C:\ordner\1.xls,2.xls usw.
ist das möglich?
und wie mache ich das

gruss Mandi

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

Betreff
Datum
Anwender
Anzeige
Re: UserForm
10.08.2002 17:01:33
Andre
Hallo,

da findest Du bestimmt im Archiv was passendes zum Verzeichnisauslesen.
Hier mal kurz was zum Füllen einer Listbox.

Public Sub test()
'ausfüllen einer Listbox
'funktioniert ausschliesslich über 2-dimensionales array
'auch wenn columncount nur 1 ist
'Beispiel für einspaltige Liste
'in der for-next-Schleife die gewünschten Daten einarbeiten
Dim arr(1, 1 To 10)
For i = 1 To 10
arr(0, i) = i
Next
UserForm1.ListBox1.Column = arr
UserForm1.Show
End Sub

Aus der Listbox kannst Du je nach Einstellung ein oder mehrere Daten wählen und diese dann z.B. öffnen.

gruss andre

Anzeige
Re: UserForm
10.08.2002 18:50:42
mandi
kann leider im Archiv kein lising
finden das passt.
und komme nicht so richtig weiter
einfaches Beispiel...
10.08.2002 19:00:01
L.Vira
Private Sub UserForm_Initialize()
Dim Datei As String
ListBox1.Clear
Datei = Dir("C:\ordner\")
Do While Datei <> ""
ListBox1.AddItem Datei
Datei = Dir
Loop
End Sub

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige