Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
288to292
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
288to292
288to292
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

ComboBox mit Access-Daten füllen?

ComboBox mit Access-Daten füllen?
08.08.2003 11:07:27
andreas
Hallo...,
ich versuche verzweifelt eine Combobox in einer Excel-UF mit Daten einer Access-Abfrage zu füllen. Die Combobox zeigt mir immer nur den ersten Datensatz an, egal wieviele Datensätze die Abfrage enthält.
Könnt ihr mir helfen?
Und tschüß
andreas

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ComboBox mit Access-Daten füllen?
08.08.2003 11:12:03
Ingoschn
beispiel code von mir

Private Sub UserForm_Initialize()
Dim objworapp As Object
Dim xlAnw As Object    ' Variable für Verweis deklarieren.
Dim rs As Object
Set nameconn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.RecordSet")
nameconn.Open "DSN=test"
SQL = "select [Komm-Nr] from bericht"
rs.Open SQL, nameconn, 3, 3
a = rs
b = a("komm-nr")
If rs.RecordCount() > 0 Then
Do While Not rs.EOF
cmbliste.AddItem rs.Fields("Komm-Nr") & vbTab
rs.MoveNext
Loop
End If
End Sub

wäre dankbar wenn man mir im tausch sagen könnte, wie ich die variable in ein thisdocument modul global übertragen könnte

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige