Hi all,

is it possible in VBA to check if an url exists

Thanks

Good morning Aldo

I don't know of a more direct way, but this routine will trap a call to
an invalid url. If the address exists, it will be opened

On Error GoTo Last
ThisWorkbook.FollowHyperlink Address:="http://www.microsof.com",
NewWindow:=True
Exit Sub
Last:
MsgBox "Invalid address"

HTH

DominicB


--
dominicb
------------------------------------------------------------------------
dominicb's Profile: http://www.excelforum.com/member.php...o&userid=18932
View this thread: http://www.excelforum.com/showthread...hreadid=472254

Thanks, it works !

"dominicb" a écrit
dans le message de news:
...

Good morning Aldo

I don't know of a more direct way, but this routine will trap a call to
an invalid url. If the address exists, it will be opened

On Error GoTo Last
ThisWorkbook.FollowHyperlink Address:="http://www.microsof.com",
NewWindow:=True
Exit Sub
Last:
MsgBox "Invalid address"

HTH

DominicB


--
dominicb
------------------------------------------------------------------------
dominicb's Profile:
http://www.excelforum.com/member.php...o&userid=18932
View this thread: http://www.excelforum.com/showthread...hreadid=472254