Skip to main content

Kutools for Office — 하나의 패키지. 다섯 가지 도구. 더 많은 일을 처리하세요.

Word 문서에서 표 캡션을 위에서 아래로 또는 그 반대로 이동하려면 어떻게 해야 하나요?

Author Xiaoyang Last modified

Word 문서에서 각 표 아래에 삽입된 여러 표가 있는 경우, 때때로 이러한 캡션을 표 아래에서 위로 이동하고 싶을 수 있습니다. 이 작업을 가능한 한 빨리 일괄 처리하려면 어떻게 해야 할까요?

VBA 코드를 사용하여 Word에서 표 캡션을 아래에서 위로 또는 그 반대로 이동하기

VBA 코드를 사용하여 Word에서 표 캡션을 아래에서 위로 또는 그 반대로 이동하기

표 아래의 모든 캡션을 표 위로 이동하려면 다음 VBA 코드가 도움이 될 것입니다. 아래 단계를 따라주세요:

1. ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. 삽입 > 모듈을 클릭하고, 모듈 창에 다음 매크로를 붙여넣습니다.

Word 문서에서 표 캡션을 아래에서 위로 이동하기

Sub ReLabelDownToUpTables()
    Dim I As Long
    Dim xRngPre As Range
    Dim xRngNext As Range
    Application.ScreenUpdating = False
    With ActiveDocument
        For I = .Tables.Count To 1 Step -1
            With .Tables(I).Range
                Set xRngPre = .Characters.First.Previous.Characters.Last
                xRngPre.Select
                Set xRngNext = .Characters.Last.Next.Paragraphs.First.Range
                xRngNext.Select
                With xRngPre
                    .InsertBefore vbCr
                    .Style = xRngNext.Style
                    .Start = .End - 1
                    .End = .Start
                End With
                If Len(xRngNext.Text) > 1 Then
                    xRngNext.End = xRngNext.End - 1
                    xRngNext.Cut
                    xRngNext.Delete
                    xRngPre.Paste
                Else
                    xRngNext.Delete
                End If
            End With
        Next
    End With
    Application.ScreenUpdating = True
End Sub

3. 그런 다음, F5 키를 눌러 이 코드를 실행하면 모든 표 캡션이 표 아래에서 위로 이동됩니다. 스크린샷을 참조하세요:

All table captions are moved from below to above

참고: 표 캡션을 표 위에서 아래로 이동하려면 다음 VBA 코드를 적용하세요:

Word 문서에서 표 캡션을 위에서 아래로 이동하기

Sub ReLabelUpToDownTables()
    Dim I As Long
    Dim xRngPre As Range
    Dim xRngNext As Range
    Application.ScreenUpdating = False
    With ActiveDocument
        For I = .Tables.Count To 1 Step -1
            With .Tables(I).Range
                Set xRngNext = .Characters.First.Previous.Paragraphs.First.Range
                xRngNext.Select
                Set xRngPre = .Characters.Last.Next
                xRngPre.End = xRngPre.End - 1
                xRngPre.Select
                With xRngPre
                    .InsertBefore vbCr
                    .Style = xRngNext.Style
                    .Start = .End - 1
                    .End = .Start
                End With
                If Len(xRngNext.Text) > 1 Then
                    xRngNext.End = xRngNext.End - 1
                    xRngNext.Cut
                    xRngNext.Delete
                    xRngPre.Paste
                Else
                    xRngNext.Delete
                End If
            End With
        Next
    End With
    Application.ScreenUpdating = True
End Sub

여러 표, 그림 또는 수식 캡션을 한 번에 Word 문서에 삽입하기

일반적으로 Word 파일에서 표, 이미지 또는 수식에 대해 하나씩 표, 그림 또는 수식 캡션을 삽입해야 합니다. 하지만 Kutools for Word의 다중 캡션 기능이 있다면, 모든 표, 이미지 또는 수식에 대해 가능한 한 빠르게 캡션을 삽입할 수 있습니다.

Batch Insert Captions

Kutools for Word는 작업을 간소화하고 문서 처리 기술을 향상시키는 최고의 Word 추가 기능입니다. 지금 바로 구매하세요!

최고의 오피스 생산성 도구

Kutools for Word - 100가지의 뛰어난 기능으로 Word 경험을 한 단계 높여보세요!

🤖 Kutools AI Features: AI Assistant / Real-Time Assistant / Super Polish (서식 유지) / Super Translate (서식 유지) / AI Redaction / AI Proofread...

📘 문서 마스터하기: 페이지 분할 / 문서 병합 / 다양한 형식(PDF/TXT/DOC/HTML 등)으로 선택 영역 솔루션 내보내기 / PDF로 일괄 변환...

✏ 텍스트 편집: 여러 파일에서 일괄 찾기 및 바꾸기 / 모든 그림 크기 조정 / 표 행과 열 전환 / 표를 텍스트로 변환...

🧹 손쉬운 정리: 여분의 공백 / 구역 나누기 / 텍스트 상자 / 하이퍼링크를 깔끔하게 제거하세요. 더 많은 제거 도구는 '제거' 그룹에서 확인할 수 있습니다...

➕ 창의적 삽입: 천 단위 구분 기호 삽입 / 체크 박스 삽입 / 라디오 버튼 삽입 / QR 코드 / 바코드 / 여러 그림 삽입 / 더 많은 기능은 삽입 그룹에서 찾아보세요...

🔍 정밀 선택: 특정 페이지 / 표 / 도형 / 제목 단락을 정확히 선택하세요. 더 다양한 선택 기능으로 탐색을 더욱 향상하세요...

⭐ 특별 기능: 원하는 범위로 빠르게 탐색 / 반복 텍스트 자동 삽입 / 문서 창 간 토글 /11 가지 변환 도구...

🌍 40개 이상의 언어 지원: Kutools를 원하는 언어로 사용할 수 있습니다 – 영어, 스페인어, 독일어, 프랑스어, 중국어 등40개 이상의 언어를 지원합니다!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 이러한 기능을 사용해보고 싶으신가요? 지금 Kutools for Word를 다운로드하세요! 🚀
 

✨ Kutools for Office – 한 번의 설치로5가지 강력한 도구 제공!

Office Tab Pro · Kutools for Excel · Kutools for Outlook · Kutools for Word · Kutools for PowerPoint가 포함되어 있습니다

📦5가지 도구를 한 번에 이용 | 🔗 Microsoft Office와 무결점 통합 | ⚡ 즉시 저장 시간 절약 및 생산성 향상

최고의 오피스 생산성 도구

Kutools for Word - 100+ Word용 도구

무료 다운로드 즉시 구매 Kutools 자세히 알아보기