本文格式为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.wddqw.com/doc/63fdb00fa11614791711cc7931b765ce05087ab1.html