Remplir un combobox

Bonjour,

Pour finaliser mon fichier, est ce que quelqu'un peut m’aider à transférer les informations de mon combo box sur une feuille svp ?

C'est Urgent.

Merci par avance,

12illustration.xlsm (40.07 Ko)

Re,

pour le bouton valider de ton userform1

Private Sub CommandButton1_Click()
'Déclaration variable
Dim ligne
'--- Positionnement dans la base
ligne = Sheets("DONNEES").[A65000].End(xlUp).Row + 1
'--- Transfert Formulaire dans BD
Sheets("DONNEES").Cells(ligne, 1) = UserForm1.TextBox1.Value ' client
Sheets("DONNEES").Cells(ligne, 2) = UserForm1.TextBox8.Value ' matricule
Sheets("DONNEES").Cells(ligne, 3) = UserForm1.TextBox2.Value ' n°ticket caisse
' etc.
' Sheets("DONNEES").Cells(ligne, 4) = UserForm1.TextBox...................
' Sheets("DONNEES").Cells(ligne, 5) = UserForm1.TextBox...................
End Sub

crdlt,

André

22illustration-2.xlsm (43.42 Ko)

Bonjour Andre13,

Je tiens à te dire un grand merci. Grace à toi, la plus grosse partie est enfin terminée.

Je peux maintenant souffler. Jusqu’à ce soir, je ne voyais pas le bout du tunnel. maintenant je peux dire ouf à moi les nuits de sommeil .

J’ai encore la partie sur les doublons à terminer avant de clôturer ce fichier qui est destiné à aider mon petit frère qui vient de trouver un emploi.

Grand merci encore à tous ceux qui ont participé.

Rechercher des sujets similaires à "remplir combobox"