XL 2010 Symbole sur curseur

[Magic_Doctor]

Bonjour,

Serait-il possible de faire apparaître un symbole (doigt, par exemple) sur le curseur quand celui-ci passe au-dessus d'une cellule donnée ?

 

[Magic_Doctor]

En effet, avec les APIs on peut faire beaucoup de choses. Mais bien utilisées, elles ne sont pas si diaboliques que ça.

 

[jmfmarques]

Mais bien utilisées, elles ne sont pas si diaboliques que ça.

"Diaboliques", non (pourquoi le seraient-elles) ? Celles qui seraient ici nécessaires ne sont certes pas "diaboliques"

Mais bien utilisées

dans le cas des fonctions en cause, c'est moins le fait de "bien les utiliser", qui est indispensable, que l'absence totale (partout ailleurs dans le code), d'instructions (autres que ces fonctions) pouvant générer un crash du fait que ces fonctions sont en cours d'utilisation.
Je n'ai maintenant personnellement rien d'autre à ajouter.

 

[Magic_Doctor]

Bonjour patricktoulon,

J'ai eu le temps de bien regarder ton document du Post#24.
Ça peut être très intéressant dans bien des situations. Mais pas évident pour saisir toute la syntaxe...
J'ai découvert les CommandBars.FindControl et leur bibliothèque (mais pas encore très clair dans mon esprit...) :
Findcontrols IDs

J'ai essayé d'y apporter quelques modifications qui ont bien marché.

Merci pour cette info.

 

[patricktoulon]

re
explication sur le procédé
1 le module thisworkbook est un module classe on va donc utiliser celui ci plutôt qu'ajouter un module classe

2° on ajoute un events sur la commandbar cet événement n'est pas implémenté en temps normal
par contre après la création de l'event on a bien l’implémentation

3° dans l’événement onupdate on change un control(que l'on utilise rarement voir jamais)
ce qui fait que l’événement tourne en boucle
avec un doevents a l’intérieur pour libérer vba
parti de là tu fait ce que tu veux avec cet events (même appeler une autre fonction ou sub
c'est moins lourd qu'une boucle vba for next ou do loop par ce que comme tout les événements ça se fait en interne
c'est assez simple comme concept
on arrete en détruisant cmbrs(=nothing) tout simplement

😉

 

[Magic_Doctor]

Bonjour,

Je reviens sur ce fil.
J'ai repris un fichier qu'avait posté patricktoulon. J'y ai fait quelques modifications et ça marche bien. L'effet est sympathique.
Ma question est la suivante : puisque l'on n'a plus besoin des CommanButtons "Start" & "Stop", peut-on s'en affranchir ?

 

[patricktoulon]

bonsoir
faudrait il que l'on ai accès au code chez moi 2013 aucun module ne contient du code pourtant ça fonctionne
c'est plus que suspect ton truc
comment fait tu pour que les modules paraissent vides

 

[Staple1600]

Bonsoir le fil

Chez moi également 2013, et je vois du module
(Mais j'ai mes lunettes sur le nez)

 

[job75]

Bonsoir à tous

faudrait il que l'on ai accès au code chez moi 2013 aucun module ne contient du code pourtant ça fonctionne

Chez moi sur Excel 2019 il y a du code visible dans les 3 modules.

A+

 

[patricktoulon]

re
ca y est c'est mon antivirus qui avait bloqué le fichier va savoir pourquoi
pour le reste je ne pige pas la demande il fonctionne en autonome pas besoins des boutons
a condition de remettre "start" dans l'event open

 

[Magic_Doctor]

Re,

Autant pour moi. Je ne sais pas ce qui s'était réellement passé, mais quand je virais les 2 CommandButtons devenus inutiles, l'effet ne semblait plus marcher. Je viens de réessayer et maintenant ça a l'air de bien fonctionner.