iStarOSX
XLDnaute Junior
Bonjour
J'ai essayé d'utiliser une partie du code de BOISGONTIER que j'ai trouvé dans ce post :
Mais pour ma part je voudrais que mon combobox ne s'alimente pas à l'initialisation de mon USF, mais lors d'un click sur un bouton de mon USF.
J'ai donc mis le code trouvé précédemment en fin d'instruction de mon bouton :
Mais Excel affiche le message "Erreur de compilation: Variable non définie" et pointe la variable "c"
Je suppose que je doit déclarer cette variable en début d'instruction, mais je ne sais pas quoi écrire.
Je comprend rien au variable.
En VBA j'utilise que des truc simple genre if, and, Or,... des trucs de conditions quoi.
Si quelqu'un pouvait m'aider merci.
J'ai essayé d'utiliser une partie du code de BOISGONTIER que j'ai trouvé dans ce post :
HTML:
http://www.excel-downloads.com/forum/119674-combobox-sans-vide.html
Code:
Private Sub UserForm_Initialize()
With Sheets("recapoperation")
For Each c In Sheets("recapoperation").Range("M5:M" & .Range("M65000").End(xlUp).Row)
If c <> "" Then
Me.ComboBox5.AddItem c
'Me.ComboBox6.AddItem c
'Me.ComboBox7.AddItem c
'Me.ComboBox8.AddItem c
End If
Next c
End With
End SubMais pour ma part je voudrais que mon combobox ne s'alimente pas à l'initialisation de mon USF, mais lors d'un click sur un bouton de mon USF.
J'ai donc mis le code trouvé précédemment en fin d'instruction de mon bouton :
Code:
Private Sub CommandButton1_Click()
Sheets("Moteur Calculs").Range("C1") = ComboBox1.Value
Sheets("Moteur Calculs").Range("D1") = ComboBox2.Value
Sheets("Moteur Calculs").Range("E1") = ComboBox3.Value
Sheets("Moteur Calculs").Range("F1") = ComboBox4.Value
Sheets("Moteur Calculs").Range("G1") = ComboBox5.Value
WebBrowser1.Navigate Sheets("Moteur Calculs").Range("L1").Value
With Sheets("R5")
For Each c In Sheets("R5").Range("A1:A" & .Range("A65000").End(xlUp).Row)
If c <> "" Then
Me.ComboBox1.AddItem c
'Me.ComboBox6.AddItem c
'Me.ComboBox7.AddItem c
'Me.ComboBox8.AddItem c
End If
Next c
End With
End SubMais Excel affiche le message "Erreur de compilation: Variable non définie" et pointe la variable "c"
Je suppose que je doit déclarer cette variable en début d'instruction, mais je ne sais pas quoi écrire.
Je comprend rien au variable.
En VBA j'utilise que des truc simple genre if, and, Or,... des trucs de conditions quoi.
Si quelqu'un pouvait m'aider merci.