Appel a procedure "BeforeRightClick"

[bernardrustrel]

Bonjour
J'aimerai pouvoir appeler via un code une des procédures évènementielles du style:
"Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)".

Car j'ajoute, suivant une condition, une feuille à mon classeur et à partir de cette nouvelle feuille je voudrais désactiver l'affichage du menu contextuel du clik droit de la souris , pour ouvrir un formulaire qui me permettra de poursuivre ...
Cancel=True, fonctionne très bien lorsque la feuille est native au classeur.

J'avoue me casser la tête sur le sujet, j'ai essayé pas mal de solution à moins qu'il existe une API qui permettrait cela. Là j'avoue être novice de ce coté.

Par avance merci, si l'un de vous avait une solution à proposer.
Cordialement, Bernard

 

[mapomme]

Bonjour,

Une piste : essayez la procédure évènementielle de ThisWorkbook:

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
MsgBox Sh.Name
Cancel = True
End Sub

Si des feuilles ne sont pas concernées par cette procédure, il faudra par exemple tester leur nom et, le cas échéant, sortir de la procédure avant d'appeler Msgbox ou ouvrir votre formulaire.

 

[bernardrustrel]

Bonjour
J'avais envisager cette piste sans avoir effectuer de test sur le nom des feuilles non concernées.
En attendant, c'est exactement ce que je voulais ça fonctionne très bien
Merci à vous de m'avoir éclairer
Cordialement. Bernard