try % 如果Word服务器已打开,则直接返回其句柄
ActxWord = actxGetRunningServer('Word.Application');
catch % 创建Word服务器
ActxWord = actxserver('Word.Application');
end
set(ActxWord,'Visible',1); % 设置Word服务器可见
try
Path = 'D:\Users\Documents\xielizhi\项目学习\xielizhi';
Doc = ActxWord.Documents.Open([Path '\test.docx']);
catch
Doc = ActxWord.Documents.Add();
end
ActxWord.Selection.Text = '使用MATLAB生成Word报告';
Doc.SaveAs2([Path '/test.docx']);