access 窗体按钮点击无效

2025-03-30 17:40:28

推荐回答（2个）

回答1：

楼上正解，我试了，好用。现在举例说明
Dim Office_Path As String 'Access安装路径
Office_Path = "C:\Program Files\Microsoft Office\OFFICE11\"
'call Shell(Office_Path & "Msaccess.exe " & "D:\TBCS08\TBCS08D.MDB", 3)'这是引用绝对路径，要打开的数据库名为TBCS08D.MDB,改成你自己的数据库名就行。
call Shell(Office_Path & "Msaccess.exe " & App.Path & "\TBCS08D.MDB", 3)'这是引用相对路径
下面是打开WORD与EXCEL方法，赠送
call Shell(Office_Path & "WINWORD.EXE") '打开WORD
call Shell(Office_Path & "EXCEL.EXE") '打开EXCEL
另外,站长团上有产品团购,便宜有保证

回答2：

看看你的vba代码怎么写的？