如何使用 VBA 从 Word 文档中删除水平制表符

Question

是否可以使用 VBA 从 Microsoft Word 文档中删除水平制表符？我已经学会了删除空格。但是尝试删除水平制表符时却不起作用。

Answer 1

我认为自己已经解决了尝试使用 VBA 从 Word 文档中删除制表符的问题。这就是我的方法。下面给出的代码负责从 Word 文档中删除多余的空格（如果单词之间有多个空格）以及制表符。

 Sub Blank_Spaaces_Unwanted_Remove()

    Dim ospace As Characters
    Set ospace = ActiveDocument.Characters

    Dim xspace As Integer
    xspace = 0

    For Each aspace In ospace
        If aspace <> Chr(32) Then ' Chr(32) equals space.
            xspace = 0
        End If
        If aspace = Chr(32) Then
            xspace = xspace + 1
            If (xspace = 2) Then
                aspace.Delete
                xspace = 1
            End If
        End If
        If aspace = vbTab Then
            aspace.Delete
        End If
    Next aspace


 End Sub