☰

Microsoft Word에서 탭을 들여쓰기로 변환하는 방법

tag-icon • tag-icon microsoft-word vba text-formatting
Microsoft Word에서 탭을 들여쓰기로 변환하는 방법

다른 편집기에서 Microsoft Word로 붙여넣은 텍스트를 복사할 때 단락의 시작 부분에 탭이 표시됩니다. 더 나은 형식을 얻으려면 단락 들여쓰기로 변환하는 방법은 무엇입니까?

답변1

제가 찾은 가장 좋은 방법은 VBA 매크로를 작성하는 것이었습니다.

아마도 성능에 최적화되지는 않았지만 작업은 수행됩니다. =)

Sub ConvertLeadingTabsToIndents()
    On Error GoTo Error

    Application.ScreenUpdating = False

    Dim found As Boolean

    found = FindNextTab()
    While (found)
        Selection.MoveRight Unit:=wdCharacter, Count:=1
        Selection.TypeBackspace
        Selection.Paragraphs.Indent

        found = FindNextTab()
    Wend

    MsgBox "Success!", vbInformation

Exit_Sub:
    Exit Sub

Error:
    Application.ScreenUpdating = True
    ' Regenerate original error.
    Dim intErrNum As Integer
    intErrNum = Err
    Err.Clear
    Err.Raise intErrNum
End Sub

Function FindNextTab()
    With Selection.Find
        .Text = "^p^t"
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
    End With
    FindNextTab = Selection.Find.Execute
End Function

관련 정보