Syntaxe

Bonjour,

Je suis un grand débutant (pour m'excuser de poser une question aussi simple pour vous).

Quelqu'un pourrait-il me donner la syntaxe pour affecter cette petite macro à la colonne A et à une cellule individuelle de la même feuille (par ex E1).

Je tâtonne mais je n'y arrive pas.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)

If Not Intersect(Target, Range("A4:A" & Rows.Count)) Is Nothing Then

Cancel = True

UserForm1.Show

End If

End Sub

Merci beaucoup

Bonjour,

Essaie avec

If Not Intersect(Target, Range("A4:A" & Rows.Count)) Is Nothing Or Target.Address = "$E$1" Then

A+

Bonjour Frangy,

Merci d'avoir porté attention à mon message, ça marche très bien.

Encore merci et bonne soirée.