Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
120to124
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
120to124
120to124
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Mehrspaltige Listbox füllen

Mehrspaltige Listbox füllen
24.05.2002 16:24:01
Philip
Hallo zusammen!
ich habe ein kleines Problem. Ich möchte Daten aus Access (Abfrage SQL) in einer Listbox in ein Userform unter Excel einfügen.
Ich kann 1 Spalte einfügen, haber ich schaffe es nicht mit mehrere.
Vielen Dank für Ihre Hilfe !

Philip;-)

Stand der Macro:

Private Sub TEST()
Dim DB As Database
Dim Rs As Recordset
Dim SQL As String
Dim V As String
Dim Anz As Variant
Set DB = DBEngine.OpenDatabase("C:\DATEN\DB.MDB")
Let V = TextBoxFAZID.Text
If V = "" Then GoTo Err
SQL = "SELECT * From OBJEKT where FAZ_ID = " & V
Set Rs = DB.OpenRecordset(SQL)
If Rs.EOF Then GoTo Err 'kein DS gefunden
With Rs
.MoveLast
Anz = .RecordCount
.MoveFirst
End With

For i = 1 To Anz
ListBoxOBJLISTE.AddItem ("???") 'PROBLEM
Next i

Rs.Close
DB.Close
Exit Sub
Err:

End Sub

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Mehrspaltige Listbox füllen
24.05.2002 16:54:40
ich !
Ok, ...ist erledigt !
Danke trozdem

Gruß,
Philip.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige