Код VBA, чтобы узнать действительность URL, который проверит, существует ли URL или нет

Question

У меня есть код, чтобы узнать о существовании URL, но во многих других системах или, возможно, в другой офисной версии он не работает.не могли бы вы помочь мне с этим?Где я делаю неправильно?Есть ли альтернативный вариант?Заранее спасибо Я использую код, чтобы узнать, что URL VALIDITY

Public Function IsURLGood(URL As String) As Boolean
Dim request As New WinHttpRequest

On Error GoTo IsURLGoodError
request.Open "HEAD", URL
request.send
If request.Status = 200 Then
    IsURLGood = True
Else
    IsURLGood = False
End If
Exit Function

IsURLGoodError:
IsURLGood = False
End Function

Для проверки существования URL

If IsURLGood(Sheet1.Range("D10")) Then
'MsgBox "correct"
Else
MsgBox "URL is invalid."
    End If