Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
288to292
288to292
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ComboBox mit Access-Daten füllen?

Forumthread: 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
Anzeige

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)

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