代码制作试卷〔三〕——设置科目及标题格式

2022-07-14 21:11:14 第一文档网 [ 字体：小中大 ] [

阅读： ] [

说明：文章内容仅供预览，部分内容可能不全。下载后的文档，内容与下面显示的完全一致。下载之前请确认下面内容是否您想要的，是否完整无缺。下载word有问题请添加QQ：admin处理，感谢您的支持与谅解。

【#第一文档网# 导语】以下是®第一文档网的小编为您整理的《代码制作试卷〔三〕——设置科目及标题格式》，欢迎阅读！
科目,试卷,设置,代码,格式

本文格式为Word版，下载可任意编辑，页眉双击删除即可。

.PrgrphFormt.lignment = wdlignPrgrphJustify

代码制作试卷〔三〕——设置科目及标题格式

试卷制作〔三〕

试卷的正文格式设置完成，就要设置试卷标题格式了。能常我们可以把试卷标题设置成小二字号，华文中宋字体。并要求试卷标题居中显示。

"======================================================================================================================== "======================================================================================================================== Sub 设置科目标题格式()

Dim rngFormt s Rnge "设置科目标题格式 Set rngFormt = ctiveDocument.Rnge( _ Strt:=ctiveDocument.Prgrphs(2).Rnge.Strt, _ End:=ctiveDocument.Prgrphs(2).Rnge.End) With rngFormt .Font.Nme = 华文中宋

.Font.Bold = wdToggle .Font.Size = 24 End With

With ctiveDocument.Prgrphs(2)

.lignment = wdlignPrgrphCenter "标题居中 .Spcefter = InchesToPoints(0.1) End With End Sub

"======================================================================================================================== "======================================================================================================================== 仁寿县黑龙滩镇杨柳小学校唐希胜 2022-10-28

第 1 页共 1 页

本文来源：https://www.dywdw.cn/63fdb00fa11614791711cc7931b765ce05087ab1.html