captainejack
XLDnaute Occasionnel
Bonjour à tous
Quand je coche dans la cellule A1 par un "X" ,une valeur numérique s'affiche automatiquement dans cette même cellule. Pour cela j'emploie ce code:
If Target.Count = 1 And Target.Address = "$A$1" And UCase(Target.Value) = "X" Then _
Target.Value = 6
et ainsi de suite
Dans le tableau joint , dans les colonnes D et F, je souhaiterai faire la même chose , tout en sachant que je serais amené à ajouter des lignes intermédiares.
Quel serait le code ?
En vous remerciant
Quand je coche dans la cellule A1 par un "X" ,une valeur numérique s'affiche automatiquement dans cette même cellule. Pour cela j'emploie ce code:
If Target.Count = 1 And Target.Address = "$A$1" And UCase(Target.Value) = "X" Then _
Target.Value = 6
et ainsi de suite
Dans le tableau joint , dans les colonnes D et F, je souhaiterai faire la même chose , tout en sachant que je serais amené à ajouter des lignes intermédiares.
Quel serait le code ?
En vous remerciant