Question

我有一个特定的Excel工作表，用于我正在分析的复合中的许多不同区域，需要将每个单独的链接到MS Access 2007中表单上的特定按钮。电子表格的设置方式不允许我只需导入它，所以我想有一个按钮，我可以点击数据库，打开实际的Excel文件。到目前为止，我找到的任何东西都无法解决这个问题，所以任何帮助都会非常受欢迎!!

Answer 1

您可以通过对ShellExecute的API调用在VBA中打开任何文件或应用程序。

把它放在一个模块中：

Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, _
ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal lpnShowCmd As Long) As Long


Public Sub OpenFile(ByVal File As String)
    ShellExecute 0, "open", File, "", "", 1
End Sub

现在，您可以使用OpenFile方法打开Excel文件：

OpenFile "C:\YourExcelFile.xls"

它将使用默认应用程序（希望在您的计算机上使用Excel）打开，就好像您在Windows资源管理器中单击它一样。

Answer 2

在大多数情况下，您可以将FollowHyperlink与应用程序一起使用：

 FollowHyperlink "c:\docs\myexcel.xls"

将Excel文件链接到MS Access表单

2 个答案: