如何取消首行缩进？？

冰封气流

各位大大，如何取消段落的 首行缩进？？？
录宏的话 ，代码太多，直接看不懂
Sub aaa()
      ActiveDocument.Paragraphs(2).IndentFirstLineCharWidth -2       ‘这段代码运行就会变成如下图所示：
End Sub

A1233515

不用代码的话，就直接全选--段落--调整为无格式就行了

413191246se

1. Sub 取消首行缩进()
   
2.     With Selection.ParagraphFormat
   
3.         .CharacterUnitFirstLineIndent = 0
   
4.         .FirstLineIndent = CentimetersToPoints(0)
   
5.     End With
   
6. End Sub

复制代码

冰封气流

A1233515 发表于 2021-5-13 07:17
不用代码的话，就直接全选--段落--调整为无格式就行了

只对其中的一段取消首行缩进，然后什么都不改变
用代码该如何实现呢？
大佬，求教~~

A1233515

  ActiveDocument.Paragraphs(2).IndentFirstLineCharWidth -10000
试试

冰封气流

A1233515 发表于 2021-5-13 09:32
ActiveDocument.Paragraphs(2).IndentFirstLineCharWidth -10000
试试

不行，试过了，会把第段落第一行首行缩进取消，然后第二行、第三行格式会乱的

冰封气流

413191246se 发表于 2021-5-13 09:23

谢谢，完美的解决方案

小草看日出

全选该段，然后“样式”——“全部清除”就行了，这个好操作。

小草看日出

413191246se 发表于 2021-5-13 09:23

学习了，第一次知道word中也可以用VBA代码。