Есть проблема со стандартным окном открытия файла Office.

Используется следующий код:

Sub getFileName()
    ' Для выбора имени файла со скрином текущей детали
    ' используется стандартное окно открытия файла Office.
    ' Если пользователь указывает файл, его содержимое
    ' отображается в элементе управления ImageFrame.
    Dim fileName As String
    Dim result As Integer
    Dim dlgOpen As FileDialog
     Set dlgOpen = Application.FileDialog(msoFileDialogFilePicker)
       With dlgOpen
        .Title = "Выбор скрина детали"
        .Filters.Add "Все файлы", "*.*"
        .Filters.Add "JPEG", "*.jpg"
        .Filters.Add "Рисунки", "*.bmp"
        .FilterIndex = 3
        .AllowMultiSelect = False
        .InitialFileName = CurrentProject.path
        result = .Show
        If (result <> 0) Then
            fileName = Trim(.SelectedItems.Item(1))
            Me![ImagePath].Visible = True
            Me![ImagePath].SetFocus
            Me![ImagePath].Text = fileName
            Me![Имя].SetFocus
            Me![ImagePath].Visible = False
        End If
    End With
End Sub

При нажатии на кнопку, которая вызывает код, описанный выше,  в строке " Dim dlgOpen As FileDialog" выдается ошибка "Compile error. User-defined type not defined". 

 Возможно у меня не подгружена какая-то библиотека? Тогда вопрос, какая библиотека работает с Application.FileDialog?

Или в чем может быть ошибка?

Спасибо