发布网友 发布时间:2024-10-24 04:51
共3个回答
热心网友 时间:2024-11-07 01:03
Function ‘自定义函数
OpenWord(FileName)‘打开括号名字的WORD文件
Dim wordApp As New Word.Application ‘定义word应用程序
Dim wordDoc As New Word.Document ‘定义word类型
Set wordApp = CreateObject("Word.Application") ‘创建WORD对象
wordApp.Visible = False ‘关闭OFFICE WORD 界面
Set wordDoc = wordApp.Documents.Open(FileName) ‘打开文档
End Fun ‘结束
热心网友 时间:2024-11-07 01:10
Ibudong
热心网友 时间:2024-11-07 01:10
ok