Как проверить гиперссылки?

[Teslenko_EA]

Здравствуйте Сергей.
Функция может выглядеть так:

Function errFile$(eF)
    If Len(eF & "") = 0 Then
        errFile = "Пусто"
    ElseIf Len(Dir(eF, vbDirectory)) Then
        errFile = "True"
    Else
        errFile = "False"
    End If
End Function

Вы впервые на форуме и потому наверное "не заметили" слов: "..один вопрос = одна тема.."
и решили не создавать тему, а выложить свой вопрос в теме обсуждавшейся два года назад.

Евгений.