Discussion :

[Merryy]

Bonjour,
mon petit soucis c'est de remplir ma combobox qui se trouve dans une feuille et pas dans une userform , avec des données stockés dans une feuille excel .
Le code suivant ne fonctionne pas pour moi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub UserForm_Initialize()
      Me.cboComboBox.RowSource = "Feuil1!A1:A" & Sheets("Feuil1").Cells(1, 1).End(xlDown).Row
End Sub

Merci

[patricktoulon]

re
et ben dis donc!!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub UserForm_Initialize()
          Me.cboComboBox.List = Sheets("Feuil1").Range(Cells(1, 1), Cells(Rows.Count, 1).End(xlUp)).Value
End Sub

[Merryy]

enfaite moi je travaille pas avec un userform c'est ca le problem . ma combobox est situé dans une feuille excel

[patricktoulon]

et ben dis donc ( mille fois)!!!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Worksheet_Activate()
cboComboBox.object.List = Range(Cells(1, 1), Cells(Rows.Count, 1).End(xlUp)).Value
End Sub

[Merryy]

est ce que je peux ecrire ce code ici ??

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub ComboBox1_Change()
 
End Sub

[patricktoulon]

non hahahaha!!!!

pour qu'un combo change il faut qu'il soit rempli de quelque chose

met ce que je t'ai donner dans le module du sheets en question soit le 1