Inputbox via et si inscription

bonjour a tous

j’essaie de faire apparaitre un inputbox en cells D ("16:40") des que les lignes coresspondantes ont leurs cells B("16:40") de remplies

je m'explique quand dans la cell("B16") la liste déroulante affiche la donnée a écrire, je voudrais dès l'écriture qu'un inputbox s'affiche afin d'obliger l'utilisateur a rentrer un chiffre pour qu'il s'inscrive en même temps que la validation de l'inputbox en cells D16

et ce jusque la ligne 40

j'espère être assez clair

Pascal

Bonjour,

Essaie avec ce code à placer dans la feuille concernée par ta demande

Private Sub Worksheet_Change(ByVal Target As Range)
Dim num As Long
If Not Intersect(Target, Range("B16:B40")) Is Nothing Then
    num = Application.InputBox("Entrer un chiffre", Type:=1)
    Range("D" & Target.Row) = num
End If
End Sub

Pour le placer,

• clique droite sur l'onglet de ta feuille
• choisir l'option "visualiser le code"
• coller le code dans la fenetre

Si ok lors de ta réponse veille à cliquer sur le v vert à coté du bouton EDITER pour cloturer le fil

Amicalement

bonjour Dan

de bon matin et les neurrones au point, chapeau pour la rapidité de réponse et sa qualité et surtout son fonctionnement

très bonne journée

Pascal