Ouvrir un popup par survol d'une cellule

[Claude Azoulai]

Bonjour à tous
Je voudrais, lorsque le curseur survole une cellule particulière , afficher en popup un petit texte, par exemple "01/02/2006".
Quelqu'un a-t-il une idée.
Merci de votre réponse.
Claude Azoulai

 

[JYLL]

Re : Ouvrir un popup par survol d'une cellule

Bonjour Claude Azoulai et le forum,

Je ne sais si cela répond à ta question, mais en faisant "insertion" "Commentaire" quand tu pas sur la cellule avecle pointeur de la souris, le texte s'affiche.

Bon test.

Amicalement.

Jean-Yves

 

[Claude Azoulai]

Re : Ouvrir un popup par survol d'une cellule

Merci Jyll

Ce n'est pas ce que je recherchais, car je veux le faire par programme, mais j'ai essayé pour voir.
1-Le commentaire ne s'affiche pas quand je suvole la cellule avec le pointeur.
2-Si je coche "commentaire et indicateur" dans le menu outils/options, le commentaire reste toujours affiché.
Salutations
Claude Azoulai

 

[ODVJ]

Re : Ouvrir un popup par survol d'une cellule

Bonjour à tous,

le survol d'une cellule commentée fonctionne chez moi :j'ai mis indicateur seul pour les commentaires.

config : XP+XL 2003

A+

 

[nat54]

Re : Ouvrir un popup par survol d'une cellule

Bonjour,

@ ODVJ : de même chez moi

 

[Claude Azoulai]

Re : Ouvrir un popup par survol d'une cellule

Merci à vous

Je n'avais pas coché la bonne option "Indicateur seul".
Maintenant ça fonctionne.
Si je n'ai pas une réponse concernant VBA, je vais essayer de m'en inspirer.
Mais j'aurai souhaité que quelqu'un me donne une solution en VBA.

Merci à vous tous

Claude Azoulai

 

[nat54]

Re : Ouvrir un popup par survol d'une cellule

Bonjour,

Un essai mais je sais pas si c'est ce que vous voulez...

 

[porcinet82]

Re : Ouvrir un popup par survol d'une cellule

Bonjour le fil,

Claude, il me semble que l'on ne pas faire exactement ce que tu veux en vba, mais tu as d'autres possibilités via les macro evenementielles, soit par double click (comme le propose Nat), click droit ou encore lorsque tu click sur une cellules, pour celles qui se rapprochent le plus de ce que tu demandes.

@+

 

[nat54]

Re : Ouvrir un popup par survol d'une cellule

Par contre, j'ai essayé avec activate, pensant que ca marcherait juste en sélectionnant la cellule (et non double clic) mais ca marche pô

 

[Claude Azoulai]

Re : Ouvrir un popup par survol d'une cellule

A vous tous qui m'aidez

J'ai trouvé la solution !!!!
Si je veux afficher dans un popup le texte "21/10/2006" lorsque que le curseur passe sur la cellule A7, voici ce que j'ai écrit :

Range("A7").AddComment
Range("A7").Comment.Visible = False
Range("A7").Comment.Text Text:="21/10/2006"
Range("A7").Comment.Shape.Height = 12
Range("A7").Comment.Shape.Width = 50
Les trois premières lignes on été trouvées en enregistrant une macros
Les deux dernières en cherchant un peu dans les propriétés.

Grand merci à vous tous

Claude Azoulai

 

[ODVJ]

Re : Ouvrir un popup par survol d'une cellule

Bonsoir à tous,

??????​

j'avais compris que la proposition de JYLL ne te convenait pas!

A+

 

[nat54]

Re : Ouvrir un popup par survol d'une cellule

Oui moi aussi j'avais compris que insertion/commentaire n'allait pas
Là c'est la même chose en VBA, donc + complexe