Access에서 Excel 스프레드 시트를 선택하라는 메시지가 표시됩니까?

Excel 스프레드 시트를 사용하여 둘 사이의 변경 사항을 추적하는 Microsoft Access 2007 데이터베이스가 있습니다. 매주 새로운 파일이 생성됩니다. 그런 다음 내가 작성한 사용자 지정 SQL 쿼리로 두 가지를 비교합니다. 지금은 연결된 테이블 관리자를 사용하여 연결했습니다. 그 안에는 아무것도하지 않는 것처럼 보이는 새 위치를 항상 묻는 옵션이 있습니다. 현재 워크 시트를 다시 선택하십시오.

어쨌든 사용자가 Access 파일을 열 때마다 Excel 스프레드 시트를 선택하라는 메시지를 항상 표시해야합니까?

참조를 설정 한 VBA (tools-References)다음 찾아서 클릭 "Microsoft Office"하여 사용해야합니다.

Dim myDialog As FileDialog
Dim strFile As String
Dim strSearchPath as string
Dim vrtSelectedItem As Variant
Set myDialog = Application.FileDialog(msoFileDialogOpen)

With myDialog
    .AllowMultiSelect = True
     .Filters.Add "Excel Files", "*.xls", 1
    .Title = "Select the file"
    .InitialFileName = strSearchPath
    If .Show = -1 Then   
        For Each vrtSelectedItem In .SelectedItems         
          ImportIt (vrtSelectedItem)
        Next vrtSelectedItem
    Else
        'The user pressed Cancel.
    End If
   Set myDialog = Nothing
End With

참고 : 테스트되지 않았습니다.