word vba取消首行缩进
时间: 2023-07-02 10:07:23 浏览: 225
可以使用以下代码取消 Word 文档中选定段落的首行缩进:
```
Selection.ParagraphFormat.FirstLineIndent = 0
```
如果要取消整篇文档的首行缩进,可以使用以下代码:
```
ActiveDocument.Content.ParagraphFormat.FirstLineIndent = 0
```
请注意,这将取消整篇文档中所有段落的首行缩进。如果您只想取消某些段落的首行缩进,请先选定这些段落,然后运行第一个代码示例。
相关问题
word vba全文首行缩进为0
你可以使用以下代码将 Word 文档中的全文首行缩进设置为0:
```
Sub SetFirstLineIndentToZero()
ActiveDocument.Range.Paragraphs.TabHangingIndent = False
ActiveDocument.Range.Paragraphs.FirstLineIndent = 0
End Sub
```
这个宏会将选中的整个文档中的所有段落都设置为全文首行缩进为0。如果要仅将当前光标所在位置的段落设置为全文首行缩进为0,可以使用以下代码:
```
Sub SetFirstLineIndentToZero()
Selection.Paragraphs.TabHangingIndent = False
Selection.Paragraphs.FirstLineIndent = 0
End Sub
```
这个宏只会影响当前光标所在位置的段落。在 Word 中,你可以将这些宏添加到快捷方式或自定义工具栏上以方便使用。
Word vba首行缩进设置
可以通过以下代码设置Word文档中段落的首行缩进:
```vb
Sub SetFirstLineIndent()
' 设置选定段落的首行缩进为1厘米
Selection.ParagraphFormat.FirstLineIndent = CentimetersToPoints(1)
End Sub
```
如果要将整个文档中所有段落的首行缩进设置为1厘米,可以使用以下代码:
```vb
Sub SetFirstLineIndentForAllParagraphs()
Dim i As Integer
For i = 1 To ActiveDocument.Paragraphs.Count
ActiveDocument.Paragraphs(i).Format.FirstLineIndent = CentimetersToPoints(1)
Next i
End Sub
```
注意,这些代码只能在Word VBA中使用,不能在其他应用程序中使用。