Forum di Excel e VBA, per condividere esperienze e risolvere problemi su:
Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
riempire le combobox
- Hai un problema con Excel?
riempire le combobox
di dom (utente non iscritto) data: 06/12/2014 11:28:18
ho su un foglio excel una combobox,
dovrei riempire la combo con i dati di un database con vba.
ho fatto cosi:
e non funziona
Do Until rs.EOF tipo.additem rs("nome") rs.movenext Loop
di Lucas87 data: 06/12/2014 13:19:23
Ciao
Guarda il codice sotto.
Ipotizzando di avere il database sulla colonna A
k = Range("a" & Rows.Count).End(xlUp).Row ComboBox1.ListFillRange = Range("a1:a" & k).Address(0, 0) 'con la combobox sul foglio ComboBox1.RowSource = Range("a1:a" & k).Address(0, 0) 'con la combobox in un form
di Lucas87 data: 06/12/2014 13:27:45
Oppure anche così
k = Range("a" & Rows.Count).End(xlUp).Row For Each ra In Range("a1:a" & k) ComboBox1.AddItem ra Next
di Zer0Kelvin data: 06/12/2014 15:47:13
Salve a tutti.
Prima di continuare con un "botta e risposta" alla cieca direi di specificare meglio la richiesta.
Che tipo di oggetto è "rs" e cosa dovrebbe significare l'espressione rs("nome")?
riempire database
di dom (utente non iscritto) data: 07/12/2014 08:01:25
scusate rs("nome") è un recordset.
ho provato come sotto Vba e ora funziona, mi riempie la combo in base al recordset.
Dovrei selezionare il nome e dopo recuperare tutti i valori del record selezionato scrivendo nelle varie celle gli altri dati.
Ho provato cosi:
Foglio1.dipendenti.ListIndex rs("codicefiscale")
ma mi da errore
Utilizzo non valido di proprety.
Foglio1.dipendenti.AddItem rs("cognome")
- Vuoi Approfondire?
