Comment modifier texte info-bulle en auto ?
stefanodimecanic
Messages postés
819
Statut
Membre
-
Le Pingou Messages postés 12713 Date d'inscription Statut Contributeur Dernière intervention -
Le Pingou Messages postés 12713 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Lorsque je créée une image avec un lien hypertexte vers une cellule d'un aure onglet, par défaut le texte de l'info-bulle est le chemin complet de ce lien.
J'aimerai modifier ce texte en faisant apparaître en automatique le contenu de la cellule de destination, en l'occurence un texte.
En automatique c'est à dire en tapant dans le champ du texte info-bulle une commande qui récupére l'adresse de la cullule pointée :
- sélectionner l'image par clic droit
- modifier lien hypertexte
- bouton info-bulle
> on arrive dans le champ en question
Merci d'avance.
Lorsque je créée une image avec un lien hypertexte vers une cellule d'un aure onglet, par défaut le texte de l'info-bulle est le chemin complet de ce lien.
J'aimerai modifier ce texte en faisant apparaître en automatique le contenu de la cellule de destination, en l'occurence un texte.
En automatique c'est à dire en tapant dans le champ du texte info-bulle une commande qui récupére l'adresse de la cullule pointée :
- sélectionner l'image par clic droit
- modifier lien hypertexte
- bouton info-bulle
> on arrive dans le champ en question
Merci d'avance.
A voir également:
- Excel info-bulle dynamique
- Liste déroulante excel - Guide
- Tableau croisé dynamique excel exemple - Guide
- Info pc - Guide
- Word et excel gratuit - Guide
- Crystal disk info - Télécharger - Informations & Diagnostic
5 réponses
Bonjour,
Je ne suis pas certain d'avoir bien compris !
Clic droit sur la cellule ou se trouve le lien hypertexte et clic sur [Modifier le lien hypertexte] et dans la fen^tre qui s'ouvre vous tapez le texte désiré dans [Texte à afficher] et OK pour terminer.
Je ne suis pas certain d'avoir bien compris !
Clic droit sur la cellule ou se trouve le lien hypertexte et clic sur [Modifier le lien hypertexte] et dans la fen^tre qui s'ouvre vous tapez le texte désiré dans [Texte à afficher] et OK pour terminer.
Bonjour Le Pingou,
Merci mais ça je sais faire.
Ce que je veux c'est que le texte soit celui compris dans la cellule pointée par le lien hypertexte.
Exemple :
je crée dans Feuil1! un lien vers la cellule A1 de Feuil2!, laquelle cellule comprend le texte DUPONT.
Je veux donc que le texte info-bulle qui apparaîtra en passant sur la cellule, ou l'objet, qui utilise le ien hypertexte en Feuil1! soit "DUPONT", sans avoir à écrire DUPONT comme tu l'indique dans ta réponse.
Merci mais ça je sais faire.
Ce que je veux c'est que le texte soit celui compris dans la cellule pointée par le lien hypertexte.
Exemple :
je crée dans Feuil1! un lien vers la cellule A1 de Feuil2!, laquelle cellule comprend le texte DUPONT.
Je veux donc que le texte info-bulle qui apparaîtra en passant sur la cellule, ou l'objet, qui utilise le ien hypertexte en Feuil1! soit "DUPONT", sans avoir à écrire DUPONT comme tu l'indique dans ta réponse.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour,
Il me semble que la seule possibilité soit de taper le texte "Dupont" via le bouton [Info-bulle...] à droite sur la fenêtre
[Modifier l'hyperlien].
Eventuellement avec cette macro il est possible de créer une info-bulle :
Sub HyperL_infobulle()
Letexte = "texte1" & Chr(10) & "texte2" & Chr(10) & "Blablabla" ' &etc....
'--------on pourra ci-dessus éventuellement par boucle concatener plusieures cellules
Application.Goto Reference:=Range("g5")
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", ScreenTip:=Letexte, TextToDisplay:=""
End Sub
Il me semble que la seule possibilité soit de taper le texte "Dupont" via le bouton [Info-bulle...] à droite sur la fenêtre
[Modifier l'hyperlien].
Eventuellement avec cette macro il est possible de créer une info-bulle :
Sub HyperL_infobulle()
Letexte = "texte1" & Chr(10) & "texte2" & Chr(10) & "Blablabla" ' &etc....
'--------on pourra ci-dessus éventuellement par boucle concatener plusieures cellules
Application.Goto Reference:=Range("g5")
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", ScreenTip:=Letexte, TextToDisplay:=""
End Sub
