Discussion :

[mobiclick]

Bonjour le forum,

J'ai créé un commandbutton qui me permet d'inséerer une formule dans chaque cellule de la plage A10:A24:

Code :

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

1
2
3
Private Sub tarif_Click()
Range("A10:A24").FormulaR1C1 = "=IF(RC[-1]="""","""",RC[-1]*50/100)"
End Sub

Elle fonctionne très bien,mais je voudrais pouvoir changer la valeur 50/100 à partir d'un combobox .Est-ce possible sous Excel 2007 ?

Par exemple ,lorsque je choisis ou saisis la valeur 20/100 dans ma combobox et que je valide en cliquant sur commandbutton, la formule devient

Code :

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

Range("A10:A24").FormulaR1C1 = "=IF(RC[-1]="""","""",RC[-1]*20/100 )"

Merci d'avance

[sabzzz]

bonjour mobiclick,

Code :

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

Range("A10:A24").FormulaR1C1 = "=IF(RC[-1]="""","""",RC[-1]*" & ComboBox1 & ")"

ps / en partant de la colonne A et avec C-1 on arrive à la colonne IV

[mobiclick]

GRAND MERCI Sabzzz
Le code fonctionne à merveille...
Salutations amicales