Les Allergies
Alimentaires
Posez votre question Signaler

(VB Excel) lien hypertexte automatique

jpls - Dernière réponse le 3 août 2011 à 14:39
Bonjour,

Sous excel je cherche à programmer une macro qui génère des liens hypertextes automatiques sur la base d'un numéro saisi manuellement.
Je n'y arrive pas, pourtant je ne pense pas que ce soit bien difficiele :
- on saisi un numéro de courrier XXX
- création du lien hypertexte C:/blabla/truc/XXX
NB : le doc XXX existe déjà et toujours
Si quelqu'un a une idée je suis preneur
Merci d'avance
Lire la suite 

(VB Excel) lien hypertexte automatique »

11 réponses
Réponse
+9
moins plus
Merci pour ta réponse JvDo.

En fait G résolu le problème sans macro en utilisant la fonction Lien_Hypertexte d'Excel.

A noter pour ceux que ça intéresse la syntaxe "&G5&" pour introduire la valeur de la cellule G5 dans le chemin utilisé pour le lien hypertexte
flo - 28 avril 2008 à 15:13
Bonjour,

Pourriez vous dévelloper votre astuce pr génèrer des liens hypertextes automatiques sur la base d'un numéro sur feuille excel et nom de dossier saisi manuellement.
J'ai essayé "&cellule&" mais ca ne fonctionne pas.

Merci d'avance
Takius - 24 juin 2011 à 09:25
Le sujet est vieux de deux ans, je viens de le remarquer, mais je poste quand même le code que j'ai trouvé pour générer un lien en fonction de la valeur d'une cellule ( je ne sais pas si c'est ce que les auteurs recherchaient mais bon...
"adresse/?=" & Cells(L , C)
où L =la ligne et C = la colonne
Thordek - 5 juil. 2011 à 16:36
Je vois pas trop où ecrire ton code Takius, ce sujet m'interesse beaucoup car j'ai 800 cases à mettre en lien hypertexte.
Peux-tu dévelloper un peu toi aussi s'il te plait ?
Ajouter un commentaire
Réponse
+6
moins plus
bonjour,

un bout de code que j'utilise :

For Each cell In Selection
adresse = cell.Offset(0, 1).Value
ActiveSheet.Hyperlinks.Add Anchor:=cell, Address:=adresse
Next

ce code travaille sur une sélection de cellules contenant les libellés.
il leur affecte le lien hypertexte qui se trouve dans la cellule à droite.

cordialement
Ajouter un commentaire
Réponse
+5
moins plus
Bonjour, novice en macro sous Excel, j'aimerais en programmer une pour créer des liens hypertextes : La première colonne de mon fichier Excel contient des noms de fichiers (environ 2000 noms différents) et j'aimerais pouvoir les ouvrir directement à partir d'Excel. Comment faire pour programmer une macro qui crèe automatiquement ces liens (car Excel les perd régulièrement).

Merci de votre aide.
kiki - 14 déc. 2007 à 13:59
1) - Pour ne pas perdre tes liens il faut aller dans Outils, Options, onglet "Géneral", bouton "Option web", et décocher "mettre à jour les liens lors de l'enregistrement"

2) - Voici une macro que j'utilise
Principe :
La colonne B contient le chemin complet + le nom du fichier.
La macro crée un lien à partir de ces données de la 2ème ligne jusqu'à la fin.

Si le nom du fichier se trouve dans la colonne A alors il faut remplacer b par a et choisir la 2ème option en remplacant C:\temp\ par ton chemin.

Dim Lien
Selection.End(xlDown).Select
fin = Selection.Row
For i = 2 To fin
Range("b" & i).Select
Lien = Range("b" & i).Value
If Lien = "" Then GoTo retour
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Lien

'2ème option : ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="C:\temp\" & Lien
retour:
Next
End Sub
didou - 12 févr. 2009 à 14:16
Merci beaucoup. Aprè qques ajustements, début et fin macro, votre macro marche à merveille et c'est très précieux pour le classement et la visualisation de photos à partir d'un tableau EXCEL les classant par thèmes.

Vous m'avez rendu un sacré service

Didou
Ajouter un commentaire
Réponse
+3
moins plus
pour ceux qui lisent ce poste pour eviter de faire boucler jusqu'au nombre max de ligne placer la fonction "retour:" apres "next":
j'ai essayé avec une bouton de commande et c'est parfait ca s'arrete à la dernière cellule saisie ;)
Ajouter un commentaire
Réponse
+0
moins plus
bonjour je peut savoir comment faire un lien hypertext entre word et excel et comment ouvrir des feuilles a partir le word s'il vous plaît j'ai besoin de le connais
merci de votre aider
bye
Ajouter un commentaire
Réponse
-4
moins plus
désolé vieux sujet j'aurai pas du répondre
Ajouter un commentaire
Ce document intitulé « (VB Excel) lien hypertexte automatique » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?