J'ai un code qui me permet, lorsque je double clique n'importe où sur la feuille, de m'afficher l'UserForm1.
J'aimerais adapter ce code pour que l'UserForm1 ne s'affiche que quand je clique sur une certaine plage de la feuille (plage nommée "tableau"). Et que rien ne se passe lorsque je double clique en dehors de cette page.
Je vous transmets le code qu'il faut adapter :
Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, cancel As Boolean)
l = Target.Row: UserForm1.Show
cancel = True
End Sub
Re : Appliquer un évenement Worksheet_BeforeDoubleClick à une plage de données
Bonsoir,
ne sera actif que sur la plage A1:A10 :
Code:
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, Range("A1:A10")) Is Nothing Then Exit Sub
UserForm1.Show
Cancel = True
End Sub
Re : Appliquer un évenement Worksheet_BeforeDoubleClick à une plage de données
Bonjour pasbleau,
Ceci devrait fonctionner :
VB:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, cancel As Boolean)
If Not Intersect(Target, [tableau]) Is Nothing Then
l = Target.Row: UserForm1.Show
End If
cancel = True
End Sub