Création
d'entreprise
Posez votre question Signaler

Excel : création automatique liens hypertexte [Résolu]

juju93110 17Messages postés 17 décembre 2007Date d'inscription 11 mai 2010Dernière intervention - Dernière réponse le 14 nov. 2008 à 12:04
Bonjour,
Je dispose d'un classeur excel avec plusieurs onglets. Le permier onglet (index) sert de table des matières avec 2 colonnes :
- lieu
- numéro de série
Les autres onglets sont numérotés à partir des numéros de série présents dans le tableau d'index.
Je souhaite créer à partir d'une macro un lien hypertexte à partir de chaque nom de lieu vers l'onglet concerné. J'ai rédigé ce petit bout de code :
----------------------------------------------------------
Sheets("Index").Select
decalage_ligne = 0
Do While Range("A8").Offset(decalage_ligne, 0).Value <> ""
lieu = Range("A8").Offset(decalage_ligne, 0).Value
numero = Range("C8").Offset(decalage_ligne, 0).Value
Range("A8").Offset(decalage_ligne, 0).Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:=????, TextToDisplay:=lieu
Loop
----------------------------------------------
Le problème est que je ne sais pas comment définir l'adresse de destination du lien ( SubAddress:=???? ). Les onglets sont numérotés sur 3 chiffres.
Pouvez-vous m'aider ? Merci d'avance.
Lire la suite 

Excel : création automatique liens hypertexte »

3 réponses
Réponse
+0
moins plus
Bonjour,

Je pense que tu peux écrire l'instruction suivante :


SubAddress:=Str(numero) & "!A1"

Ne pas oublier d'incrémenter le decalage_ligne :

decalage_ligne = decalage_ligne + 1


Par contre fais attention si des numéros de série commencent par 0 tu risque d'avoir un problème
Ajouter un commentaire
Réponse
+0
moins plus
Merci pour ta réponse, ça fonctionne très bien.

Mes numéros d'onglets ne commencent jamais par 0.
pilas31- 14 nov. 2008 à 12:04
Bonjour,

Heureux d'avoir pu rendre service
(ne pas oublier de marquer Résolu)

A+
Ajouter un commentaire
Ce document intitulé « Excel : création automatique liens hypertexte » 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 ?