Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Simuler un double clic avec SendKeys

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,
Je vous souhaite une belle journée 🙂

Je n'arrive pas à Simuler un double clic avec SendKeys

Dans le fichier joint, le but est de :
- feuille SendKeys en B18 faire un clic qui simule le double clic,
- et renvoie à l'exécution du code "Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)"

Auriez-vous le bon code ?
Un grand merci par avance.
Je joins mon fichier SendKeys et je continue mes recherches...
lionel 🙂
 

Pièces jointes

Dernière édition:
Solution
Bonjour le fil

Lionel

Je te propose ce fichier (c'est un peu biscornue donc parfait pour toi !!!! 🤣🤣🤣)
Explication :
Des que tu vas dans la cellule B18 tu déclenches l’événement sélection change qui déclenche le module Appel qui appelle l’événement BeforeDoubleClick .....Ouf j'ai fini....😉

*Merci de ton retour

@Phil69970
Bonjour,
N'est-ce pas possible de mettre le code dans un module standard, d'associer la macro à un raccourci clavier (par exemple ctrl+G) et d'envoyer le sendkeys "^G" pour activer ?
Bien qu'une procédure call pourrait je pense faire le travail tout pareil 🤷‍♂️
A +
 
Bonjour le fil

Lionel

Je te propose ce fichier (c'est un peu biscornue donc parfait pour toi !!!! 🤣🤣🤣)
Explication :
Des que tu vas dans la cellule B18 tu déclenches l’événement sélection change qui déclenche le module Appel qui appelle l’événement BeforeDoubleClick .....Ouf j'ai fini....😉

*Merci de ton retour

@Phil69970
 

Pièces jointes

Dernière édition:
Bonjour,

Dans le fichier joint, le but est de :
- feuille SendKeys en B18 faire un clic qui simule le double clic,
- et renvoie à l'exécution du code "Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)"
Sinon, tu mets le code de Worksheet_BeforeDoubleClick directement dans Worksheet_SelectionChange mais c'est vrai que du coup c'est un peu trop simple... 🙄
 
Dernière édition:
Bonjour mon Marcel32 préféré 🙂
ça fait longtemps ...
"Sinon, tu mets le code de Worksheet_BeforeDoubleClick directement dans Worksheet_SelectionChange"
Je ne suis pas contre les choses simples lol
Mais je ne jamais pensé à faire ça.
Je ne sais pas si je saurai le faire ... vais tenter ...
lionel 🙂
 
Je ne suis pas contre les choses simples lol
Mais je ne jamais pensé à faire ça.
Je ne sais pas si je saurai le faire ... vais tenter ...
Ce que je disais, c'est : si tu n'as plus besoin du double clic, tu mets le code du double clic dans SelectionChange.

En revanche, si tu as toujours besoin du BeforeDoubleClick, tu peux simplement faire appel à BeforeDoubleClick plutôt que de recopier son code dans SelectionChange comme l'a parfaitement décrit @Phil69970 en #4.
 
Bonsoir,
Tu mets le contenu de Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)"

Dans un module standard
Sub DoubleClick(ByVal Target As Range)
Et tu appelles cette sub de n'importe où y compris de Worksheet_BeforeDoubleClick
 
Je ne comprends pas
En lieu et place de son SendKeys, il écrit
DoubleClick [B18]

Et dans Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Il écrit DoubleClick Target
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
155
Réponses
1
Affichages
306
Réponses
32
Affichages
338
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…