Avatar billede ves Nybegynder
27. november 2010 - 04:12 Der er 2 kommentarer og
1 løsning

Combobox

Hej

Jeg har en userform i excel hvor jeg laver 2 comboboxe der skal hente opslag fra en database.
Jeg har koden men det virker kun på den ene :-(
Denne virker fint men når jeg bruger den samme kode i den anden combobox og afvikler, vises der ikke nogen data og ingen fejl.

Private Sub CmbStatus2_Enter()
    Dim cnn As New ADODB.Connection
    Dim rst As New ADODB.Recordset
    cnn.Open "Provider=Microsoft.Ace.OLEDB.12.0;" & _
            "Data Source=C:\Databaser\Data123.accdb"
    rst.Open "SELECT DISTINCT [Status] FROM Status ORDER BY [Status];", _
            cnn, adOpenStatic
    rst.MoveFirst
    With Me.CmbStatus2
        .Clear
        Do
            .AddItem rst![Status]
            rst.MoveNext
        Loop Until rst.EOF
    End With
End Sub
Avatar billede supertekst Ekspert
27. november 2010 - 11:35 #1
Du er velkommen til at sende din Excel-fil - så skal jeg forsøge.
@-adresse under min profil.
Avatar billede ves Nybegynder
10. december 2010 - 09:41 #2
Hej supertekst

Beklager den langsomme respons men har haft lidt travlt.
Jeg fandt løsningen på problemet. jeg havde glemt rst.update :-)

Men tak for tilbuddet om hjælp.
Avatar billede supertekst Ekspert
10. december 2010 - 09:52 #3
ok -
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester