XL 2013 hyperlink sur shap mais non actif

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 !

patricktoulon

XLDnaute Barbatruc
Bonjour a tous
j'aimerais bien mémoriser des données pour x shapes sans devoir passer par une variable
j'ai dans l'idée d'ajouter de hyperlink mais de m'en servir comme mémoire et donc de déactiver les liens
est ce possible ?????
 
Solution
Bonjour à tous,
Dans un shape on peut stocker de l'info dans 2 endroits : le .Title et le .AlternativeText
Un exemple de mise en œuvre dans cette carte de France un clic pour afficher 4 infos : le code région + le nom région + le code département + le nom département.
Le vba pour le clic est simplex :
VB:
Sub Clic()
    With Sheets("Carte").Shapes(Application.Caller)
        MsgBox Replace(.AlternativeText, "|", vbCrLf), , .Title
    End With
End Sub
Ce fichier ne contient aucune liste nulle part, l'intégralité des infos est stockée dans les shapes.
P.
bonjour @job75
la macro affectée justement est sensée faire quelque chose avec ces données
j'aurais pus a la construction des shapes argumenter le onaction mais la construction des shapes est dans un ordre chaotique donc c'est compliqué car les données sont les noms d'autres shapes ultérieurement construites
 
Bonjour à tous,
Dans un shape on peut stocker de l'info dans 2 endroits : le .Title et le .AlternativeText
Un exemple de mise en œuvre dans cette carte de France un clic pour afficher 4 infos : le code région + le nom région + le code département + le nom département.
Le vba pour le clic est simplex :
VB:
Sub Clic()
    With Sheets("Carte").Shapes(Application.Caller)
        MsgBox Replace(.AlternativeText, "|", vbCrLf), , .Title
    End With
End Sub
Ce fichier ne contient aucune liste nulle part, l'intégralité des infos est stockée dans les shapes.
P.
 

Pièces jointes

Je pensais plutôt à une utilisation des propriétés BeginConnectedShape et EndConnectedShape de leur propriété ConnectorFormat plutôt que partir sur une codification de noms. Et aussi, vaguement, à un module de classe support d'un Shape non Connector muni d'une collection des connecteur l'ayant comme départ, mais ce n'est peut être pas une bonne idée. L'exploration des Connecteurs ne devrait pas être trop pénalisante.
 
re
non ça va dans le alternativetext je met les enfants et les connecteurs a la construction
et au click je n'ai plus qu'a splitter le texte
les connecteur ont le nom des enfant +"C"
demo3.gif


me reste plus qu'a faire la macro developpe & undeveloppe
 
- 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

  • Question Question
Microsoft 365 Problème Code VBA
Réponses
9
Affichages
474
Retour