Simuler un click Gche ou Dt...

[Philippe]

Bonsoir à tous,

j'aimerai pouvoir simuler par du code un click Gche sur ma feuille avec un truc du genre 'sendkeys' mais celà ne marche pas
Je sais qu'en VB c'est possible mais en VBA je ne trouve pas.

Sinon existe-t-il un raccourci clavier qui permet de sumuler le click Gche ???

Merci d'avance pour vos avis

 

[Zon]

Salut,


application.commandbars('cell).showpopup

A+++

 

[Hervé]

Bonsoir

bon alors,

Pour la simulation du clic gauche, j'ai pas compris,mais...

si tu veux simuler la sélection d'une cellule, utilise .select

par exemple :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range('a1').Select
End Sub

Ce code simule la sélection de la cellule A1, quelque soit la cellule sélectionnée.

Pour la simulation du clic droit :

Ce code fait apparaitre le menu contextuel lorsque tu sélectionne une cellule :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
SendKeys '+{F10}'
End Sub

Voilà, je pense avoir répondu à ton comment.

Par contre, je suis preneur d'une explication sur le pourquoi ?

Salut.

 

[Philippe]

Ah! Ah! POURQUOI ?? Qui suis-je, d'où viens-je ??
Eternelle question...

Bon alors: ' Pourquoi ?': pour pouvoir dans une procédure, à un moment donné, sélectionner la cellule se trouvant sous le pointeur de la souris, et celà quel que soit sa position...

Qqun sait-il donc quel code fera croire à XL qu'u click gauche a été lancé ???

 

[Abel]

Bonsoir le fil,

Si tu emmène le pointeur jusqu'à une cellule, pourquoi ne pas cliquer alors ?

Pour gagner du temps ?

Ce que tu demandes ressemble un peu à Lien supprimé

Si c'est le cas, la réponse est la même.

Bon courage.


Abel.

 

[myDearFriend!]

Bonsoir Philippe, Zon, Hervé, le Forum.

Non, je ne pense pas que cela soit possible comme ça par VBA. Peut être à grands coups d'API et encore...

Cordialement.

Heu.... au passage, 'merci' à Zon et à Hervé d'avoir bien voulu se pencher sur cette question....

 

[myDearFriend!]

Oups,

Pardon Abel, je ne t'avais pas vu arriver...

 

[Philippe]

Merci à tous pour vos avis,

le but en fait est de créer des effets comparables à ceux que l'on peut produire avec la passage de la souris sur un commandbuttion d'un USF avec la fonction mousemove....

En clair, il me faudrait l'équivalent de' worksheet_mousemove'...

C'est vrai abel que mon post évoque la demande de 'papy' (que je salue au passage)..

Bonne nuit les amis, si vous avez des idées... à demain peut-être

 

[Philippe]

TROP FORT Jmps !!!

Par contre à l'étude de ton code une subtilité m'échappe, il est où le label 1 ??? sur toute le feuille et rendu invisible ???

où est le 'sous-ruse' ???

En tous cas bravo, TOUT est possible (ou presque)...

 

[Philippe]

Hin, Hin :evil:

j'avais trouvé entre temps, merci en tous cas, j'adapte tout ça à mes besoins persos et je vous montre l'oeuvre d'art

 

[myDearFriend!]

Bonjour le tout le monde,

Bravo José ! Joli coup !

:lol: :lol: :lol:

 

[pat1545.]

Salut,
moi qui pensait que c'était HONDA ou Suzuki qui avait dit ça...



Et pis comme disait Lao-Tseu :

Sans maîtrise, la puissance n'est rien...

Enfin... Je suis pas sûr de ma source... non plus

 

[Eric C]

Bonjour le forum
Bonjour Philippe, bonjour Zon, bonjour Hervé, bonjour Abel, bonjour Didier, bonjour Pat1545 & bonjour José

Toujours des idées novatrices hein José. EXCELlent. Donc il va falloir se faire une raison, il n'y a que le café qe XL ne sait pas faire jusqu'à ce que ...........

Bon ouikand à toutes & à tous.