如何使用程序或修改注册表为word execl powerpiont 增加新的鼠标右键项目并能点击时

qing205

老大 我还要继续麻烦你啊 没办法领导要求这样搞 我只能硬着头皮往上冲了!

Sub Example() Dim MyObject As Object On Error Resume Next Set MyObject = GetObject(, "Word.Application") MsgBox MyObject.ActiveDocument.FullName Set MyObject = Nothing End Sub 这段代码只能取的word打开的文档地址 有没有关于整个office 办公软件的呢?

要是能获取当前打开的比如word powerpoint execl 的地址呢? 有没有通用的程序读取呢?

麻烦你了!

另外你有没有关于这方面的资料呢?

[此贴子已经被作者于2005-5-25 18:11:21编辑过]

qing205

up