Bonjour,
 
Je possède une liste excel dont la première colonne contient des codes de documents avec des liens hypertextes vers ces docs en pdf, et une seconde colonne avec une date.
 
Je voudrais que lorsque l’on clique sur le lien hypertexte de la première colonne, si la date de la seconde colonne n’est pas encore passée, un message d’alerte apparaisse (du type « votre doc n’est pas encore en application »).
 
J’ai essayé avec :
 
If Target.Hyperlinks.Count Then
MsgBox "blablabla"
End If
 
Le problème ai que lorsque je clique sur le lien, le message apparaît bien mais je n’ai pas le temps de cliquer sur OK que le fichier pdf s’ouvre déjà et lorsque je referme le fichier pdf, le message est toujours à l’écran.
 
Je suis novice en vba alors pouvez-vous m’aider ???
 
100000 merci d’avance.

Tu as essayer de mettre:
 
Traget.Hyperlinks.Delete ' Celà supprime le liens hypertext
 
MsgBox "votre doc n’est pas encore en application ", vbOKOnly, "Fichier non disponible"

Ou alors essai de mettre àa dans la cellule :
 
Suposons que ton lien est sur A1 et la date en B1 :
 
=SI(B1 = "";LIEN_HYPERTEXTE("";"Nom du Document non disponible" );LIEN_HYPERTEXTE("http://www.google.fr";"Document Google" ))
 
SI (Test;Valeur si vrai, Valeur si faux)
LIEN_HYPERTEXTE(URL;Nom)
 
Bon après à toi de bien mettre une date dans B1 !
 
Voilà Monsieur ! en espérant que ça t'ira !

Heu ! J'ai oublié... C'est dans A1 que tu mets ça !!