Discussion :

[juanelcalor]

Bonjour,

voilà j'ai un lien hypertexte sur une page Excel qui marche très bien si je clique dessus. Mais lorsque je veux le faire via une macro, cela ne fonctionne pas, il ne se passe rien.

Voilà mon petit bout de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Range("B29").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True

J'ai pourtant fais un enregistrement du cliquage manuel.

Quelqu'un peut me dire pourquoi cela ne fonctionne pas ?

Merci

[Megaxel]

Et tu as quoi, en B29 ?
Un hyperlien vers un autre fichier Excel?

[juanelcalor]

Ben ca peut être en général des fichiers Excel oui, mais aussi des fichiers word. Ca doit être variable.
C'est un lien qui est écrit déjà à l'aide d'une autre macro. Mais ce lien fonctionne manuellement donc je ne pense pas que le problème soit le lien, enfin je pense, avec mon peu de connaissances... lol

[Megaxel]

Mais un hyperlien, c'est fait pour cliquer dessus!
Si tu veux ouvrir un fichier par une macro, il faut faire des "Open".
Non?

[SilkyRoad]

bonsoir

si le lien hypertexte est dans la Cellule B29 , tu peux tester

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThisWorkbook.FollowHyperlink Range("B29").Hyperlinks.Item(1).Address, , True

bonne soiree
michel

[juanelcalor]

Ok je vais essayer tout ca et je vous tient au courant si ca marche

[juanelcalor]

Le open ne marche que pour des fichiers Excel. Et le FollowHyperlink est un évennement (donc une partie de code qui se produit si l'on clique sur une lien)

Je n'arrive donc pas à ouvrir de fichier word à partir d'une macro. Quelqu'un sait ??

[SilkyRoad]

bonjour

cette methode fonctionne tres bien pour ouvrir des fichiers :

.xls
.doc
.txt
.pdf
.ppt

depuis Excel



je n'ai pas compris ton dernier message :

FollowHyperlink est un évennement (donc une partie de code qui se produit si l'on clique sur une lien)

tu as testé la macro en indiquant le chemin et le nom du fichier dans la cellule B29 ?


bon apres midi

[juanelcalor]

ben en faite, quand j'ai cliqué sur l'aide excel pour savoir comment marche cette fonction, elle m'a dit que c'était un évenevement.

Bon après plusieurs prisent de têtes, en copiant l'adresse dans une cellule et en la recollant dans la bonne cellule, cela fonctionne ???????

Alala l'informatique... mais j'espere que le problème ne se reposera plus.
En tout merci d'avoir pris du temps pour me répondre. A+