Перейти к кнопке MS-доступ

Question

Я использую базу данных для настольных компьютеров. Я хочу добавить в список кнопку

Функция будет: я выберу файл из файлового браузера, и если я выберу это изображение или любой файл, и он отобразит в текстовом поле, что я создал местоположение файла.

Я использую этот код, но у меня есть ошибка, используя его.

Private Sub cmdBrowseTo_Click() 
Dim fdg As FileDialog, vrtSelectedItem As Variant 
Dim strSelectedFile As String 
Set fdg = Application.FileDialog(msoFileDialogFilePicker) 
With fdg 
.AllowMultiSelect = False 
.InitialView = msoFileDialogViewDetails 
If .Show = -1 Then 
For Each vrtSelectedItem In .SelectedItems 
strSelectedFile = vrtSelectedItem 
Next vrtSelectedItem 
Me![Path] = strSelectedFile 
Else 
End If 
End With 
Set fdg = Nothing 
End Sub 

Ошибка

Ошибка компиляции: Пользовательский тип не определен

Пожалуйста, помогите. Благодаря!

Answer 1

Пожалуйста, добавьте ссылку на библиотеку объектов Microsoft Office 15.0 (Инструменты-> Ссылки в редакторе VBA)