【#文档大全网# 导语】以下是®文档大全网的小编为您整理的《代码制作试卷〔三〕——设置科目及标题格式》,欢迎阅读!
本文格式为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.wddqxz.cn/63fdb00fa11614791711cc7931b765ce05087ab1.html