Word vba首行缩进设置运行2次

这个问题可能是因为在第一次运行时没有完全设置首行缩进，需要再次运行才能生效。你可以尝试以下代码来设置首行缩进并运行两次：

Sub SetIndentation()
    With ActiveDocument.Range.Paragraphs.TabStops
        .ClearAll
        .Add Position:=Application.InchesToPoints(0.5), _
             Alignment:=wdAlignTabLeft, _
             Leader:=wdTabLeaderSpaces
    End With
    With ActiveDocument.Range.Paragraphs
        .IndentFirstLineCharWidth 1
    End With
    ' 运行两次以确保设置生效
    ActiveDocument.Undo
    ActiveDocument.Undo
End Sub

这段代码会将首行缩进设置为一个字符宽度，并且添加一个左对齐的制表符。然后，它会运行两次 `Undo` 命令来撤销前两个操作，这样就可以确保设置生效了。