VBA请教怎样得知 某个宏里具体实现了那些操作?

utada776 2006-03-29 09:21:15
utada776 (招娣) 再次发贴 求人气

怎样得知 某个宏里具体实现了那些操作?
我知道程序中,怎样执行一个宏,代码如下
Dim AccessApp As New Access.Application
AccessApp.Visible = False
AccessApp.OpenCurrentDatabase "DBFilePath"
AccessApp.DoCmd.RunMacro "MarcoName"
AccessApp.CloseCurrentDatabase
AccessApp.Quit
Set AccessApp = Nothing
现在,我想读取这个宏里 实现了那些操作如OpenTable,OpenForm等
,有没有办法得到?问题变态,请高人指点

-----------------------------------------------
northwolves(狼行天下) ( ) 信誉

你对哪些诸如OpenCurrentDatabase方法感兴趣,可以将整个宏读入字符串,再提取"."之后的字符
--------------------------------------------

utada776 (招娣)

好办法,但是怎么将 "宏操作读入字符串"呢,
或者说我只要能得到宏对象 就行,请教

...全文
242 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
northwolves 2006-04-13
  • 打赏
  • 举报
回复
比如宏MACROX:

SUB MACROX()
Dim AccessApp As New Access.Application
AccessApp.Visible = False
AccessApp.OpenCurrentDatabase "DBFilePath"
AccessApp.DoCmd.RunMacro "MarcoName"
AccessApp.CloseCurrentDatabase
AccessApp.Quit
Set AccessApp = Nothing
END SUB
显然,对于AccessApp 的"."之后的单词就是该宏的谓语.

可以将http://community.csdn.net/Expert/topic/4637/4637288.xml?temp=.7841608的所列方法列出全部代码,再筛选出宏名和各步骤的操作符
northwolves 2006-04-13
  • 打赏
  • 举报
回复
对于模块中的不带参数的某过程,如:
sub xxxx()
....
end sub

XXXX就是宏名
lzw858 2006-04-11
  • 打赏
  • 举报
回复
用空文档和他比较呢
看哪些值变了

不知道行不

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧