Macro pour vérifier des lien hypertexte mort

Question

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 ^^.

Mytå · Answer

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å

Hélios · Answer

Re bonjour,

Je vois qu'une réponse a été apportée mais je ne peut la voir y'a t'il une raison ?

Hélios · Answer

petit up ^^

Macro pour vérifier des lien hypertexte mort

3 réponses

Votre réponse

Discussions similaires

Newsletters