Access 中启动带宏的excel
来源:互联网 发布:太阳部落景区网络取票 编辑:程序博客网 时间:2024/05/22 09:26
在access 中打开excel,先要添加对excel的引用。
代码如下:
Sub myt()
Dim xl As excel.Workbooks
excel.Application.Visible = True
Set xl = excel.Workbooks
xl.Open "D:/workfile/MWbalance/mwbalance.xls"
End Sub
但是这样打开的excel在另一个窗口,并且没有宏。解决方法有两个。
1 最简单的是用 ShellExcecute (windows API)
Private 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 nShowCmd As Long) As Long
Function OpenExcel()
ShellExecute 0, "open", "D:/workfile/MWbalance/mwbalance.xls", 0, 0, 0
End Function
2 在当前excel窗口中打开
Function OpenExcel()
Dim xl As excel.Workbook
Set xl = CreateObject("Excel.Sheet")
xl.Application.Workbooks.Open "D:/workfile/MWbalance/mwbalance.xls"
Set xl = Nothing
End Function
- Access 中启动带宏的excel
- 运行带宏的excel
- 在ASP中把EXCEL导入ACCESS 的方法
- 在access中批量导入excel文件的问题
- ASP.NET中Excel: Access is denied的问题解决
- ASP.NET中Excel: Access is denied的问题解决
- 访问带密码的access
- EXCEL转成ACCESS的问题
- 【转载】excel中自带的条件格式设置
- 通过access.oledb连接到excel中
- Excel或Access数据导入oracle中
- {ASP}从Excel导入到Access中
- 在access中批量导入excel文件
- C#中运行Excel、Word、Access
- winform导入excel到access数据库中
- winform导入excel到access数据库中
- Access无法启动的解决方法
- 进程启动命令行中怎么传递带空格的参数
- zczxc
- 编译器调整 避免出错
- 用魔法分区大师PQ8.0扩充C盘空间
- BackTrack ---装载问题
- [Flex 2] 02 Flex
- Access 中启动带宏的excel
- 汇编语言 综合研究
- .NET类库中的小知识:弱引用
- C++中的友元函数
- phpwind源码解析------index.php
- 分享java写的电驴下载完成关机小程序
- Windows系统部署 Android 开发环境以及验证之傻瓜式教程(SDK+Eclipse+ADT)
- PyDev for Eclipse 简介
- ie浏览器图标没了不见了怎么办?最全还原ie浏览器图标修复方法!