Ilino
XLDnaute Barbatruc
Bonsoir Forum
Je souhaiterais remplacer le menu qui s’affiche quand on clique sur le bouton droit de la souris, par un menu (Modifier, Supprimer, annuler) .
Je précise que la feuille ou je veux faire ce code est Protégée.
De cette manière pour l'ensembles des colonnes A B C D E ... a Z
Je vous remercie de bien vouloir me répondre, même si celle-ci est négative.
GRACIE
Je souhaiterais remplacer le menu qui s’affiche quand on clique sur le bouton droit de la souris, par un menu (Modifier, Supprimer, annuler) .
Je précise que la feuille ou je veux faire ce code est Protégée.
De cette manière pour l'ensembles des colonnes A B C D E ... a Z
Code:
If Not Intersect(Target, Range("A3:A2013")) Is Nothing Then Range("A2").Select
.
.
.
If Not Intersect(Target, Range("Z3:Z2013")) Is Nothing Then Range("Z2").Select
GRACIE