Comment afficher valeur combobox dans cellules d'une ligne

[yves03]

Bonsoir à tous,
Lorsque je selectionne une cellule dans la colonne C un userform avec 3 combobox apparait, je voudrais pouvoir copier la valeur du Combo 1 dans la cellule active ( donc C ) la valeur du Combo 2 dans la cellule de la colonne D ( meme ligne ) et la valeur du Combo 3 dans la cellule de la colonne F ( meme ligne ).
Je vous joint un petit bout de fichier
Si vous pouviez m'aider, se serait super;
Merci d'avance

 

[skoobi]

Re : Comment afficher valeur combobox dans cellules d'une ligne

Bonsoir,

voici:

Private Sub CommandButton1_Click()
With ActiveCell
  .Value = ComboBox1.Value
  .Offset(0, 1).Value = ComboBox2.Value
  .Offset(0, 3).Value = ComboBox3.Value
End With
End Sub

Bonne soirée ou nuit selon.

 

[ledzepfred]

Re : Comment afficher valeur combobox dans cellules d'une ligne

Bonsoir yves,

tu n'as pas du cherché très longtemps parmi les nombreux exemples sur ce forum ou ailleurs...

Macro à ajouter dans le code du userform

Private Sub CommandButton1_Click()
ActiveCell = ComboBox1
ActiveCell.Offset(0, 1) = ComboBox2
ActiveCell.Offset(0, 3) = ComboBox3
End Sub

EDIT: bonsoir Maitre Skoobi

a+

 

[yves03]

Re : Comment afficher valeur combobox dans cellules d'une ligne

Merci beaucoup
Bonne nuit.
🙂