Comment afficher valeur combobox dans cellules d'une ligne

yves03 · 7 Février 2009

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 · 7 Février 2009

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

Bonsoir,

voici:

Code:

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 · 7 Février 2009

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

Code:

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

EDIT: bonsoir Maitre Skoobi

a+

yves03 · 7 Février 2009

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

Merci beaucoup
Bonne nuit.
🙂

Comment afficher valeur combobox dans cellules d'une ligne

yves03

XLDnaute Occasionnel

Pièces jointes

skoobi

XLDnaute Barbatruc

ledzepfred

XLDnaute Impliqué

yves03

XLDnaute Occasionnel

Discussions similaires

Comment afficher valeur combobox dans cellules d'une ligne

yves03

XLDnaute Occasionnel

Pièces jointes

skoobi

XLDnaute Barbatruc

ledzepfred

XLDnaute Impliqué

yves03

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency