access用超鏈接打開本地文件

在應(yīng)用程序中， 我們有可能需要打開其他應(yīng)用程序，比如調(diào)用系統(tǒng)的計(jì)算器，也有打開指定的文件編輯的需求；

access對(duì)于此類操作的方法還是很多的，這里介紹用超鏈接打開指定文件

代碼如下

Dim fdg As Office.FileDialog
    Dim filePath As String
    Set fdg= Application.FileDialog(msoFileDialogOpen)
    With fdg
       .Title = "選擇想要打開的文件"
       .AllowMultiSelect = False
       .Show
    End With
    filePath = fdg.SelectedItems.Item(1) '選擇文件的路徑
    Me.打開文件.Hyperlink.Address = filePath '超鏈接打開文件