要是我的话，我会这样写
start/w winword.exe %%f
pause

【 在 callmebbser 的大作中提到: 】
: 一个命令行语句就可以了，不需要VBA。
: FOR %F IN (*.DOC*) DO @"C:\Program Files\Microsoft Office\Office15\WINWORD.E
: XE" %F /q /n /mFileCloseOrExit
: ...................
--
FROM 124.78.15.*