Word 문서에서 표 캡션을 위에서 아래로 또는 그 반대로 이동하려면 어떻게 해야 하나요?
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 키를 눌러 이 코드를 실행하면 모든 표 캡션이 표 아래에서 위로 이동됩니다. 스크린샷을 참조하세요:
참고: 표 캡션을 표 위에서 아래로 이동하려면 다음 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의 다중 캡션 기능이 있다면, 모든 표, 이미지 또는 수식에 대해 가능한 한 빠르게 캡션을 삽입할 수 있습니다.
Kutools for Word는 작업을 간소화하고 문서 처리 기술을 향상시키는 최고의 Word 추가 기능입니다. 지금 바로 구매하세요! |
최고의 오피스 생산성 도구
Kutools for Word - Word 작업 경험을 100개 이상의 놀라운 기능으로 한 단계 업그레이드하세요!
🤖 Kutools AI Features: AI 도우미 / 실시간 어시스턴트 / 슈퍼 폴리시(형식 유지) / 슈퍼 번역(형식 유지) / AI 수정 / AI 교정...
📘 문서 마스터: 페이지 분할 / 문서 병합 / 선택 영역을 다양한 형식(PDF/TXT/DOC/HTML 등)으로 내보내기 / 일괄 PDF 변환...
✏ 콘텐츠 편집: 여러 파일에서 일괄 찾기 및 바꾸기 / 모든 그림 크기 조정 / 표 행과 열 전환 / 표를 텍스트로 변환...
🧹 손쉬운 정리: 여분의 공백/구역 나누기/텍스트 상자/하이퍼링크 제거로 깔끔하게 청소하세요. 더 다양한 제거 도구는 제거 그룹에서 확인하세요...
➕ 창의적 삽입: 천 단위 구분기호 삽입 / 체크 박스 / 라디오 버튼 / QR 코드 / 바코드 / 여러 그림 삽입 / 더 많은 기능은 삽입 그룹에서 확인하세요...
🔍 정밀 선택: 특정 페이지/표/도형/제목 단락을 신속하게 선택하고, 더 많은 선택 기능으로 탐색을 향상해보세요...
⭐ 스타 기능: 원하는 위치로 빠르게 이동 / 반복 텍스트 자동 삽입 / 문서 창 전환 /11 가지 변환 도구 등...
🌍 40개 이상의 언어 지원: Kutools를 원하는 언어로 사용하세요 – 영어, 스페인어, 독일어, 프랑스어, 중국어 등40개 이상의 언어를 지원합니다!
