Message d'Erreur Lien Hypertexte

Re : Message d'Erreur Lien Hypertexte

salut..
ca tombe bien. je viens juste d'avoir le meme besoin:
modifie ton code comme ceci. (par exemple)

Private Sub label1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim num_ligne_lien As Integer
num_ligne_lien = UserForm1.TextBox1.Value
lien = Sheets("feuil1").Cells(num_ligne_lien, "A").Value
On Error GoTo errorhandler
ActiveWorkbook.FollowHyperlink Address:=lien
UserForm1.Hide
Exit Sub

errorhandler:
MsgBox ("n'existe pas")
End Sub

Re : Message d'Erreur Lien Hypertexte

Bonjour BOCARAMEL, vgendron

j'arrive trop tard, vu mon âge

en PJ

@+

PS: je n'avais pas mis MSG au bon endroit.

Re : Message d'Erreur Lien Hypertexte

Génial à vous deux

vraiment parfait
ça fonctionne nickel

Merci et Bon week-end