Запрос доступа к электронной таблице Excel

Question

В базе данных Access у меня есть таблица запросов, которая связана с формой при ее открытии и редактировании.

Как связать эту таблицу запросов с Excel, чтобы при нажатии кнопки на форме в разделе Доступ к электронной таблице в Excel, отображающей все элементы таблицы запросов Access, пользователь мог затем отредактировать электронную таблицу, если это необходимо.

Все в Access / Excel 2003

Answer 1

FollowHyperlink может быть полезным способом открыть документ любого типа с помощью зарегистрированного приложения:

FollowHyperlink "C:\SomeDir\BookX.xls"  ''Excel
FollowHyperlink "C:\SomeDir\"  ''Explorer
FollowHyperlink "mailto:example@example.com" ''Default email

Подробнее: http://msdn.microsoft.com/en-us/library/aa204494%28office.10%29.aspx

Если вы хотите манипулировать файлом Excel после того, как открыли его, лучше всего использовать Automation:

   Dim strFileName As String
   Dim objXL Object
   Dim wkb As Object

   ''New instance, GetObject for existing instance
   Set objXL = CreateObject("Excel.Application")  
   objXL.Visible = True

   strFileName = "C:\Docs\LTD.xls"
   Set wkb = objXL.Workbooks.Open(strFileName)

   ''Do stuff

   ''Give control to user
   objXLS.UserControl = True 

Answer 2

(я использую 2007, но то же самое относится) В событии нажатия кнопки (используйте конструктор кода, а не макрос) код

Shell "excel.exe " & Chr(34) & "C:\FullPathToYourFile\file.xls" & Chr(34), vbMaximizedFocus

сделает это, хотя и неуверенно. Пропуск chr(34) разрывов с путями или именами файлов с пробелами в них, и хотя обтекание пути ' должно сработать, его нет в моей версии 2007 года.

Я не знаком с тем, как сделать это в макросах, или если это возможно.