word vba左右缩进

要在 Word VBA 中设置左缩进和右缩进，可以使用以下代码：

Sub SetIndentation()
    With Selection.ParagraphFormat
        .LeftIndent = CentimetersToPoints(1) '设置左缩进为1厘米
        .RightIndent = CentimetersToPoints(1) '设置右缩进为1厘米
    End With
End Sub

这个示例设置了选定文本的段落格式的左缩进和右缩进。你可以根据需要更改左缩进和右缩进的值。在这个示例中，我们将左缩进和右缩进都设置为 1 厘米。

相关问题

Word vba首行缩进设置

可以通过以下代码设置Word文档中段落的首行缩进：

Sub SetFirstLineIndent()
    ' 设置选定段落的首行缩进为1厘米
    Selection.ParagraphFormat.FirstLineIndent = CentimetersToPoints(1)
End Sub

如果要将整个文档中所有段落的首行缩进设置为1厘米，可以使用以下代码：

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中使用，不能在其他应用程序中使用。

Word vba首行缩进设置0

你可以使用以下代码来设置Word文档中的首行缩进为0：

Sub SetFirstLineIndentToZero()
    With Selection.ParagraphFormat
        .LeftIndent = 0
        .FirstLineIndent = 0
    End With
End Sub

你可以将上述代码复制到Word的宏编辑器中，并将其保存为一个宏。然后，你可以在需要设置首行缩进为0的地方运行这个宏。你也可以将这个宏绑定到一个快捷键或者自定义按钮上，以便更方便地使用。