Je précise un truc : ma suite de nombre commence a 46 en H66 et fini à 1000 en H1020...
Et maintenant plus aucun code ne marche.....
Merci de votre patience :D
Misange
Bonjour, juste en passant : tu parles de classeurs (fichiers) différents ou de feuilles (pages) dans un seul classeur ? gérer 1000 classeurs excel,... fais attention à ne pas les ouvrir tous en même temps ! :-)
J'ai une suite de nombre qui va jusqu'a 1000, je dois creer un lien hypertexte sur chaque nombre.
Je m'explique : le nombre 90 ouvrira la page 90.xls Le nombre 999 ouvrira la page 999.xls. Ect....
Je sais faire pour un lien à la fois, mais vous avez pas une petite formule pour me faciliter le travail ?
Merci d'avance.
Bonjour,
juste en passant :
tu parles de classeurs (fichiers) différents ou de feuilles (pages) dans
un seul classeur ?
gérer 1000 classeurs excel,... fais attention à ne pas les ouvrir tous
en même temps ! :-)
Misange migrateuse
XlWiki : Participez à un travail collaboratif sur excel !
http://xlwiki.free.fr/wiki
http://www.excelabo.net
Nico a écrit :
Bonjour,
J'ai une suite de nombre qui va jusqu'a 1000,
je dois creer un lien hypertexte sur chaque nombre.
Je m'explique : le nombre 90 ouvrira la page 90.xls
Le nombre 999 ouvrira la page 999.xls.
Ect....
Je sais faire pour un lien à la fois, mais vous avez pas une
petite formule pour me faciliter le travail ?
Bonjour, juste en passant : tu parles de classeurs (fichiers) différents ou de feuilles (pages) dans un seul classeur ? gérer 1000 classeurs excel,... fais attention à ne pas les ouvrir tous en même temps ! :-)
Toujours le même problème... Je précise que j'ai Excel 2003
Voici le code :
Sub liens() Dim cell As Range
For Each cell In Range(Range("H66"), Range("H1020"))
ActiveSheet.Hyperlinks.Add Anchor:Îll, Address:="K:ClientsCahier des réclamationsFiches de garantie" & i & ".xls" & cell.Value & ".xls"
Next
End Sub
CAP2
Salut,
si tes cellules contiennent juste, comme tu le disais dans ton 1er post, les nombres, la macro ne devrait pas "doubler" l'extension. Es-tu sûr d'avoir bien pris les codes que je t'ai donnés ?
Pour rappel :
Sub liens() Dim cell As Range
For Each cell in Range(Range("H66"),Range("H1020"))
Tu n'as juste qu'à changer le "C:Documents and SettingsNeuroMes documents" par ton chemin à toi. Laisse le reste tel quel...
CAP2
"Nico" a écrit dans le message de news:
Bonjour,
Maintenant, pour les liens de 46 à 97 mon chemin se termine par : xls77xls (donc pas bon)
Et après de 97 à 1000 j'ai toujours le même lien : 97.xls (donc pas bon)
Merci,
Salut,
si tes cellules contiennent juste, comme tu le disais dans ton 1er post, les
nombres, la macro ne devrait pas "doubler" l'extension. Es-tu sûr d'avoir
bien pris les codes que je t'ai donnés ?
Pour rappel :
Sub liens()
Dim cell As Range
For Each cell in Range(Range("H66"),Range("H1020"))
si tes cellules contiennent juste, comme tu le disais dans ton 1er post, les nombres, la macro ne devrait pas "doubler" l'extension. Es-tu sûr d'avoir bien pris les codes que je t'ai donnés ?
Pour rappel :
Sub liens() Dim cell As Range
For Each cell in Range(Range("H66"),Range("H1020"))