word附注研究：word的缩进影响因素

西出阳关的故人 2020-02-12 12:32:18  

为了弄清Word中的缩进代码控制因素，近几天进行了大量的测试，得出以下结论

1、Word.Options.UseCharacterUnit = True ，资料显示它主要控制段落以字符数作为单位控制缩进，TRUE表示 是，FALSE表示，

2、经测试无论TRUE,false都不影响

3、CharacterUnitFirstLineIndent 的优先级，定义了它的值word会以他的值作为首先缩进

4、在CharacterUnitFirstLineIndent =0 的情况下，FirstLineIndent 的值才会生效，系统此时才会以其值作为缩进值，缩进的单元为厘米，并且要用 CentimetersToPoints()函数，否则系统会以这个值转换为厘米数，转换的关系为*0.035。

测试过程如下：

1、Sub 测试段落缩进()

 Word.Options.UseCharacterUnit = True

Selection.ParagraphFormat.CharacterUnitFirstLineIndent = 1

Selection.ParagraphFormat.FirstLineIndent = CentimetersToPoints(3)

Dialogs.Item(wdDialogFormatParagraph).Show

End Sub

显示结果为首行缩进1个字符，FirstLineIndent不生效

2、

Sub 测试段落缩进()

 Word.Options.UseCharacterUnit = True

Selection.ParagraphFormat.CharacterUnitFirstLineIndent = 0

Selection.ParagraphFormat.FirstLineIndent = CentimetersToPoints(3)

Dialogs.Item(wdDialogFormatParagraph).Show

End Sub

显示结果为首行缩进3厘米，FirstLineIndent生效。

3、

Sub 测试段落缩进()

 Word.Options.UseCharacterUnit = True

Selection.ParagraphFormat.CharacterUnitFirstLineIndent = 0

Selection.ParagraphFormat.FirstLineIndent = 10

Dialogs.Item(wdDialogFormatParagraph).Show 

End Sub

显示结果为首行缩进0.35厘米（表示不加CentimetersToPoints，它将值默认为磅，乘以0.035得到厘米数，即10磅*0.035=0.35厘米，FirstLineIndent生效。

————————————————

版权声明：本文为CSDN博主「西出阳关的故人」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。

原文链接：https://blog.csdn.net/lxy6904/article/details/104276619