批量操作，协调办公

gwjkkkkk · 发表于 2025-3-15 12:36

cfqan 发表于 2025-3-15 12:32
老师，下载附件运行后没有看到生成的一个文档，是不是我哪里操作出错了

解压后使用，在当前目录下生成,"生成表" 的word 文档

cfqan · 发表于 2025-3-15 12:39

gwjkkkkk 发表于 2025-3-15 12:36
解压后使用，在当前目录下生成,"生成表" 的word 文档

就是这样操作，听到运行完成的声音，没有看到生成的文档，不知道是怎么回事的

gwjkkkkk · 发表于 2025-3-15 13:00

cfqan 发表于 2025-3-15 12:39
就是这样操作，听到运行完成的声音，没有看到生成的文档，不知道是怎么回事的

在解压目录看看有没有”打印表“word文档，我这里没问题！

cfqan · 发表于 2025-3-15 13:19

gwjkkkkk 发表于 2025-3-15 13:00
在解压目录看看有没有”打印表“word文档，我这里没问题！

好的，辛苦了。

cfqan · 发表于 2025-3-15 13:31

If isFlag = True Then wdApp.Selection.Range.InsertBreak

cfqan · 发表于 2025-3-15 13:35

.SaveAs2 strSaveName: .Close 改成 .SaveAs2 Filename:=strSaveName, FileFormat:=wdFormatXMLDocument。运行就正常了

用户名		自动登录	找回密码
密码			免费注册

[求助] 批量操作，协调办公