Deroulant + action

salut a tous !!

comment trouver dans H7 le montant par rapport au menu deroulant F7 de la cellule D7

sans avoir de formule dans la cellule H7 (suppression des donnees apres calcul et les formules partent avec !!)

Bonjour

Code de Feuil1

Private Sub Worksheet_Change(ByVal Target As Range) 
If Not Application.Intersect(Target, Range("F7")) Is Nothing Then 
Target.Offset(0,2)=Range("D7")*Target.Value
End If 
End Sub 

Cordialement

c exactement ca amadeus a part que g oublier de dire que c de la ligne 7 a 15 merci d avance

Bonjour

Code feuil1

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("F7:F15")) Is Nothing Then
Target.Offset(0, 2) = Range("D" & Target.Row) * Target.Value
End If
End Sub

Cordialement

oups ptit bleme si j efface ca debogue

Bonjour

Voir fichier

Cordialement

merci de ton aide Amadéus c exactement ce que je voulais