При передачи отчёта по OLE-Технологии возникла ошибка в инструкции FROM - VBA

Формулировка задачи:

Здравствуйте, при передачи отчёта по OLE-Технологии возникла ошибка в инструкции FROM:

' Набор RecordUser будет содержать только одну строку - информацию о пользователе
   With RecordUser
    .Source = "SELECT User.Family * FROM User " & _
            "WHERE UserID = " & UserID
     'Указатель на открытое соединение
      .ActiveConnection = CurrentProject.Connection
     '.CursorType = adOpenKeyset   ' Тип курсора
     '.Open
    End With
   Dim Worker As String
   Worker = RecordUser(0) & " " & [Forms]![ChooseInstitute]![Name] & " " & [Forms]![ChooseInstitute]![Second]

Помогите, убил полчаса, вроде всё правильно. Есть подозрение на строчку ActiveConnection

* убрал

Решение задачи: «При передачи отчёта по OLE-Технологии возникла ошибка в инструкции FROM»

textual
                            Листинг программы 
                        

                            ' Набор RecordUser будет содержать только одну строку - информацию о пользователе
   With RecordUser
    .Source = "SELECT UserFamily, UserName, UserSecond " & _
              "FROM [User] " & _
              "WHERE User.UserID= " & UserID
     'Указатель на открытое соединение
      .ActiveConnection = CurrentProject.Connection
     .CursorType = adOpenKeyset   ' Тип курсора
     .Open
    End With
                        