1.新建test.doc
2.视图->宏
3.新建名为AutoOpen的宏,便于打开word时自动运行,其它自动执行指令如下
AutoExec :启动 Word 或加载全局模板时
AutoNew :每次新建文档时
AutoOpen:每次打开已有文档时
AutoClose:每次关闭文档时
AutoExit :退出 Word 或卸载全局模板时
4.写入如下内容,保存后关闭文档,其中shell与wshshell是两种执行命令的方式
Sub AutoOpen()
'
' AutoOpen 宏
'
'
Shell "cmd.exe /k whoami"
Dim wshshell
Set wshshell = CreateObject("wscript.shell")
wshshell.exec "notepad"
End Sub
5.重新打开文件,即可执行文档中的命令 whoami
与notepad
6.文件重命名后或者第一次打开需要启动宏。
注:doc文档文件与dot模板文件中均可保存宏指令