While en VBA sur Excel

Question

Bonsoir,

Voilà j'ai un petit soucis avec mon code, j'utilise le VBA de Excel et ma petite manip consiste à remplir un "ComboBox" grâce à une colonne dans une feuille Excel, j'ai essayer ceci,

Dim i

i = 1
while not isempty(range("a" & i))
  combobox.additem range("a" & i).value
  i = i + 1
wend

Mais quand le lance le programme, "Erreur d'exécution '424': Objet requis". Quelqu'un à une petite idée ? 

Merci d'avance !

jmf0 · Answer

Bonjour,

- "objet requis", hein ...
- Et tu ne vois pas où, hein... ni quel objet, hein ...


Et au fait : tout çà ? depuis VB.Net ? en te référant ainsi directement à ton Range et à ton "objet" ? .... crois pas, moi...
Alors : aide-moi à comprendre tout çà !....

cs_Fred2468 · Answer

Enfaite je test "Tant que la cellule de la colonne est pas vide, je continus à remplir mon ComboBox. Voici tout mon code (très petit je sais)

Private Sub UserForm_Initialize()
Dim i

i = 1
While Not IsEmpty(Range("a" & i))
  ComboBox.AddItem Range("a" & i).Value
  i = i + 1
Wend

End Sub

Et comme objet sur mon "UserForm" j'ai que un petit ComboBox !

jmf0 · Answer

CV'est bien ce que je pensais...
Adieu (.... mais tu devrais quand même, malgré mon adieu, te demander si tu as un contrôle nommé ComboBox ....)

While en VBA sur Excel

3 réponses

Votre réponse

Discussions similaires