一键打开当前WORD文档所在的文件夹
运行环境:分辨率:1680×1050 色深:32位 操作系统:Windows 7 Ultimate 按键精灵版本:9.00.9460
@论坛管理员2011/10/28
VBSBegin On Error Resume Next Dim word s = "set word = GetObject(," & chr(34) & "word.application" & chr(34) & ")" execute s If Err.Number=0 Then ret = word.activedocument.Path RunApp ret Set word = Nothing End If VBSEnd
按键精灵处理word文档
按键精灵操作word
按键精灵强制聊天
如何用按键精灵打开文档
按键精灵操作一个已经打开的word文档
word宏打开当前文件夹下文档