[matlab]向word文档添加标题

需要

在执行项目时,需要为表单设置标题,该标题可以自动编号,并且编号可以覆盖章节号

发展思路

通过字符实现光标定位,然后在该字符上面或下面增加题注,效果如下图所示

通过对Word的VBA研读,在增加题注前需要先设定题注格式,然后通过该定义的题注句柄,使用它的Application进行赋值题注。

函数

开发了SetCaptionLabels4Word函数,该函数有两个功能,第一个是新增题注句柄,第二个是根据新增的题注句柄在指定光标位置增加题注

使用说明

% Word % Word 服务器句柄 

% WorkType % 工作类型  % Bulit /Set % 建立题注句柄 /% 依据参数设置题注 

% CaptionLabels % 标签名 

% Separator  % 指定要在各项之间放置的分隔符的类型     % 0/1/2/3/4  % 连字符/句点/冒号/着重突出的划线/标准划线 

% ChapterStyleLevel % 章节号时标记新章节的标题样式 

% IncludeChapterNumber % 题注标签包含章节号 % true/false 

% Title    % 标签后跟着的文字
% Position % 题注位置
%          % 0/1 % 上/下

使用实例

[ CaptionLabelHandle , Message ] = SetCaptionLabels4Word( Word,’Bulit’,’表’,1,1,true,0); % 建立题注样板 

Word.Selection.Start =0;Word.Selection.End =0;a = Word.Selection.Find.Execute(‘<表格.BridgeName_Items.SheetName.时程>’); % 光标定位

[ CaptionLabelHandle , Message ] = SetCaptionLabels4Word( Word,’Set’, …
   CaptionLabelHandle,’表’,’ <文字.BridgeName><文字.Items>特征数据统计表/(<文字. PlotUnits>)’); % 插入题注

备注

资源下载: