功能:将多个word合并成一个word,按照文件名称进行分节。
实现步骤:建立新word作为合并文件,将需要合并的word打开,然后按文件夹中的顺序进行复制粘贴。
问题解决:针对参考链接2中存在的修改原有word进行了修改,存在只读word文档不允许修改保存问题,本文建立了新的word进行合并;
参考链接2会在原word中添加分页符,本文在复制粘贴后关闭原word,然后添加分页符。
应用:将类似的word进行合并,如测试报告,测试表格。
具体代码如下:
clear
clc
pwd = dir('D:\word_write\WordPath');%获取文件夹路径
pwd(1:2) = [];%删除前两个空值
FilePath = string(pwd(1).folder);%文件夹路径
for i=1:1:length(pwd)
% FilePath(i) = string(strcat(pwd(i).folder,'\',pwd(i).name));
FileName(i) = string(pwd(i).name);%文件名
end
%% 合并文件的文件名称
[file, path] = uiputfile('*.docx');%命名文件
if isequal(file,0) || isequal(path,0)
errordlg('未命名文件','错误');%错误提示
return
else
filespec_user = strcat(path,file);% 设Word文件名和路径
end
if exist(filespec_user,'file')
delete(filespec_user);
end
% 判断Word是否已经打开,若已打开,就在打开的Word中进行操作,否则就打开Word
try
% 若Word服务器已经打开,返回其

最低0.47元/天 解锁文章
2638

被折叠的 条评论
为什么被折叠?



