Lancer mon userform en double-cliquant dans une cellule
4 réponses
Laurent.H
Bonjour.
Je souhaite lancer un userform en double-cliquant dans une cellule
de la plage A3:E100.
Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je
voudrais qu'il se lance en cliquant 2 fois.
Merci.
Laurent
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Rai
Laurent.H wrote:
Bonjour. Je souhaite lancer un userform en double-cliquant dans une cellule de la plage A3:E100. Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je voudrais qu'il se lance en cliquant 2 fois. Merci. Laurent
Bonsoir,
Tu peux utiliser l'évennement 'before double clic'.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) UserForm1.Show End Sub
avec 'Target' qui contient l'adresse où est effectué le double-clic
-- Cordialement,
Rai Remplacer point par la ponctuation appropriée pour répondre...
Laurent.H wrote:
Bonjour.
Je souhaite lancer un userform en double-cliquant dans une cellule
de la plage A3:E100.
Je sais qu'avec le SelectionChange je peux lancer mon userform, mais
je voudrais qu'il se lance en cliquant 2 fois.
Merci.
Laurent
Bonsoir,
Tu peux utiliser l'évennement 'before double clic'.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
UserForm1.Show
End Sub
avec 'Target' qui contient l'adresse où est effectué le double-clic
--
Cordialement,
Rai
Remplacer point par la ponctuation appropriée pour répondre...
Bonjour. Je souhaite lancer un userform en double-cliquant dans une cellule de la plage A3:E100. Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je voudrais qu'il se lance en cliquant 2 fois. Merci. Laurent
Bonsoir,
Tu peux utiliser l'évennement 'before double clic'.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) UserForm1.Show End Sub
avec 'Target' qui contient l'adresse où est effectué le double-clic
-- Cordialement,
Rai Remplacer point par la ponctuation appropriée pour répondre...
garnote
Salut Laurent,
Peut-être que : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("a3:e100")) Is Nothing Then UserForm1.Show End Sub
Serge
"Laurent.H" a écrit dans le message de news: #tb#C1$
Bonjour. Je souhaite lancer un userform en double-cliquant dans une cellule de la plage A3:E100. Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je voudrais qu'il se lance en cliquant 2 fois. Merci. Laurent
Salut Laurent,
Peut-être que :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Not Intersect(Target, Range("a3:e100")) Is Nothing Then UserForm1.Show
End Sub
Serge
"Laurent.H" <LH@tractoo.nl> a écrit dans le message de news:
#tb#C1$REHA.808@tk2msftngp13.phx.gbl...
Bonjour.
Je souhaite lancer un userform en double-cliquant dans une cellule
de la plage A3:E100.
Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je
voudrais qu'il se lance en cliquant 2 fois.
Merci.
Laurent
Peut-être que : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("a3:e100")) Is Nothing Then UserForm1.Show End Sub
Serge
"Laurent.H" a écrit dans le message de news: #tb#C1$
Bonjour. Je souhaite lancer un userform en double-cliquant dans une cellule de la plage A3:E100. Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je voudrais qu'il se lance en cliquant 2 fois. Merci. Laurent
Laurent.H
Merci beaucoup Serge Laurent
"garnote" a écrit dans le message de news:7a3vc.608$
Salut Laurent,
Peut-être que : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("a3:e100")) Is Nothing Then UserForm1.Show End Sub
Serge
"Laurent.H" a écrit dans le message de news: #tb#C1$
Bonjour. Je souhaite lancer un userform en double-cliquant dans une cellule de la plage A3:E100. Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je voudrais qu'il se lance en cliquant 2 fois. Merci. Laurent
Merci beaucoup Serge
Laurent
"garnote" <rien@absent.net> a écrit dans le message de
news:7a3vc.608$OI5.563@edtnps84...
Salut Laurent,
Peut-être que :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Not Intersect(Target, Range("a3:e100")) Is Nothing Then UserForm1.Show
End Sub
Serge
"Laurent.H" <LH@tractoo.nl> a écrit dans le message de news:
#tb#C1$REHA.808@tk2msftngp13.phx.gbl...
Bonjour.
Je souhaite lancer un userform en double-cliquant dans une cellule
de la plage A3:E100.
Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je
voudrais qu'il se lance en cliquant 2 fois.
Merci.
Laurent
"garnote" a écrit dans le message de news:7a3vc.608$
Salut Laurent,
Peut-être que : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("a3:e100")) Is Nothing Then UserForm1.Show End Sub
Serge
"Laurent.H" a écrit dans le message de news: #tb#C1$
Bonjour. Je souhaite lancer un userform en double-cliquant dans une cellule de la plage A3:E100. Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je voudrais qu'il se lance en cliquant 2 fois. Merci. Laurent
Laurent.H
Merci beaucoup Rai Laurent
"Rai" a écrit dans le message de news:c9ieto$lg9$ Laurent.H wrote:
Bonjour. Je souhaite lancer un userform en double-cliquant dans une cellule de la plage A3:E100. Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je voudrais qu'il se lance en cliquant 2 fois. Merci. Laurent
Bonsoir,
Tu peux utiliser l'évennement 'before double clic'.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) UserForm1.Show End Sub
avec 'Target' qui contient l'adresse où est effectué le double-clic
-- Cordialement,
Rai Remplacer point par la ponctuation appropriée pour répondre...
Merci beaucoup Rai
Laurent
"Rai" <raimondpointschmidt@berlin.de> a écrit dans le message de
news:c9ieto$lg9$1@news-reader4.wanadoo.fr...
Laurent.H wrote:
Bonjour.
Je souhaite lancer un userform en double-cliquant dans une cellule
de la plage A3:E100.
Je sais qu'avec le SelectionChange je peux lancer mon userform, mais
je voudrais qu'il se lance en cliquant 2 fois.
Merci.
Laurent
Bonsoir,
Tu peux utiliser l'évennement 'before double clic'.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
UserForm1.Show
End Sub
avec 'Target' qui contient l'adresse où est effectué le double-clic
--
Cordialement,
Rai
Remplacer point par la ponctuation appropriée pour répondre...
"Rai" a écrit dans le message de news:c9ieto$lg9$ Laurent.H wrote:
Bonjour. Je souhaite lancer un userform en double-cliquant dans une cellule de la plage A3:E100. Je sais qu'avec le SelectionChange je peux lancer mon userform, mais je voudrais qu'il se lance en cliquant 2 fois. Merci. Laurent
Bonsoir,
Tu peux utiliser l'évennement 'before double clic'.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) UserForm1.Show End Sub
avec 'Target' qui contient l'adresse où est effectué le double-clic
-- Cordialement,
Rai Remplacer point par la ponctuation appropriée pour répondre...
