Macro pour vérifier des lien hypertexte mort

Fermé
Hélios - 17 mai 2011 à 21:04
 Hélios - 18 mai 2011 à 22:32
Bonjour à tous,

Je vous écris afin de savoir si il est possible via une macro de pouvoir détecter si des lien hypertexte présent sur une feuille excel sont mort ou non. Par mort j'entends qu'il ne renvoi plus vers un document,adresse..... donnée.


Je sais pas trop si c'est réalisable mais si vous avez d'autre options pourquoi pas.

Merci pour votre aide ^^.

3 réponses

Mytå Messages postés 2969 Date d'inscription mardi 20 janvier 2009 Statut Contributeur Dernière intervention 20 décembre 2016 928
17 mai 2011 à 22:55
Salut le forum

A tester
Set fso = CreateObject("Scripting.FileSystemObject")

For Each h In Worksheets(1).Hyperlinks
    If fso.FileExists(h.Address) = False Then MsgBox "File not found" &  vbcrlf &  h.Address 
Next

Mytå
0
Re bonjour,

Je vois qu'une réponse a été apportée mais je ne peut la voir y'a t'il une raison ?
0
petit up ^^
0