[原创]我的EXCEL宏文档打开程序

wx-x · 发表于 2003-7-3 17:46

给小弟一个,好吗?谢谢 wx-x@163.com

hzg7818 · 发表于 2003-7-3 19:50

to pbcwn2002：工程菜单中引用microsoft excel 9.0 object libery ldhyob版主已经说过使用ole方法实现的，代码应该就这些

doyyi · 发表于 2003-7-4 19:44

这句代码:Set xlbook = xl.Workbooks.Open("d:\123.xls")中的Open("d:\123.xls")是打开D盘123.xls,可是如果我将文件夹位置改变了,就不行了,怎么才能做到文件夹移动也能打开该文件呢?

hzg7818 · 发表于 2003-7-4 20:35

Set xlbook = xl.Workbooks.Open(App.path & "\" & 你需要的文件名.xls")

pbcwn2002 · 发表于 2003-7-5 09:43

hzg7818，谢谢你的帮助，终于成功了！为便于初涉VB编程的朋友按照自己的意愿修改代码，我将具体过程重复一遍。 1、打开VB建立一个标准EXE工程，在窗体上放置Timer和Image各一个； 2、将hzg7818给的代码复制过来。可根据自己的实际需要修改打开文件的位置及名称； 3、按照hzg7818说的修改Timer控件属性； 4、在vb的主菜单中找到[工程]——[引用]，找到microsoft excel 9.0 object libery，将其前面打勾，然后确定退出； 5、调试代码，你就应该成功了！

[此贴子已经被作者于2003-7-5 9:59:33编辑过]

清风之晨 · 发表于 2003-7-9 15:05

太棒了，我对你的敬仰如........ 谢谢你。

spicemodel · 发表于 2003-7-16 13:42

ldhyob : 你是怎样屏蔽了alt+f11 vba代码热键的？

hejun2nd · 发表于 2003-7-18 00:25

ldhyob大師, 將你的代碼移植進公司系統作試驗, 現在按ALT+F11進不了VBA了, 上司大爲光火. 解鈴還須系鈴人, 盼大師提供救命良方. 萬分感謝.

ldhyob · 发表于 2003-7-18 00:47

以下是引用hejun2nd在2003-7-18 0:25:00的发言： ldhyob大師, 將你的代碼移植進公司系統作試驗, 現在按ALT+F11進不了VBA了, 上司大爲光火. 解鈴還須系鈴人, 盼大師提供救命良方. 萬分感謝.

应该说不会出现这个问题的,关闭后,另行打开文档不会有被屏蔽的现象 ,可执行一下此语句:Application.OnKey "%{F11}"

hejun2nd · 发表于 2003-7-18 01:19

謝謝大師的及時回複. 急, 急! 盼大師再伸援手.

		自动登录	找回密码
密码			免费注册

[原创]我的EXCEL宏文档打开程序

十萬火急, ldhyob請進

問題是, 如何進入已封閉ALT+F11的文檔的VBA環境.