Открытие ссылки в браузере

Подробности параметров FollowHyperlink (MSDN): https://msdn.microsoft.com/en-us/library/office/ff822080.aspx

Всё просто, формируем поисковую строку и передаём её в браузер.

В данном случае берём русское название фильма из поля Me!txtNameRus и ищем данные по нему на: http://www.kinopoisk.ru

Private Sub cmdKinoPoiskGo_Click()

On Error GoTo cmdKinoPoiskGoErr

If Len(Me!txtNameRus & "") < 2 Then

MsgBox "Данные не введены или недостаточны для поиска!", vbCritical, "Нет обязательных Данных"

Me!txtNameRus.SetFocus

Exit Sub

End If

Application.FollowHyperlink "http://www.kinopoisk.ru/index.php?first=no&kp_query=" & Me!txtNameRus

Exit Sub

cmdKinoPoiskGoErr:

MsgBox "Процедура [cmdKinoPoiskGo_Click] привела к ошибке:" & vbCrLf & _

Err.Description & vbCrLf & " Err#" & Err.Number, vbCritical

End Sub