Bonsoir,
lors d'un précédent post, un internaute m'a très gentiment "offert" cette macro en VBA :
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target = "choix 3" Then
Target.Offset(0, 1) = inputbox("DATE SOUHAITÉE - MERCI !!")
ElseIf Target = "choix 6" Then
Target.Offset(0, 1) = inputbox("DATE SOUHAITÉE - MERCI !!")
End If
End Sub
mon problème est que je n'arrive absolument pas à l'inclure dans mon document de travail.
c'est d'autant plus incompréhensible que lorsque je la rentre dans une feuille "d'essai", tout fonctionne sans anicroche.
Je précise que je suis totalement néophyte dans cet exercice...
pouvez vous me guider ? je joins un fichier utilisé en essai pour rendre plus clair mon propos.
je précise que dans mon document de travail (composé de 14 feuilles) , toutes les listes déroulantes se trouvent sur une feuille à part.
Merci par avance de vos réponses.[
attachment=0]papymotard.xls[/attachment]