Mary는 테이블을 분할 할 매크로를 작성하고 있습니다. 활성 테이블에서 작업하는 것은 큰 문제가 아니지만 그녀는 활성 테이블의 첫 번째 행을 복사 한 다음 테이블을 분할하고 마지막으로 복사 된 행을 분할에 의해 생성 된 새 테이블의 첫 번째 행에 붙여 넣기를 원합니다. 이 작업을 제대로 수행하기 위해 Word에서 Tables 컬렉션의 두 테이블을 참조하는 데 사용하는 인덱스 번호를 확인하려고합니다. Mary는 분할 후 생성 된 테이블의 새 인덱스 번호를 알기 위해 단순히 해당 번호를 증가시킬 수 있도록 활성 테이블 (분할 전)의 인덱스 번호를 검색 할 수있는 방법을 알고 싶습니다.

Word의 개체 모델은 개별 개체를 프로그래밍 방식으로 액세스 할 수있는 컬렉션으로 구성하는 데 의존합니다. 이는 표뿐만 아니라 단락, 그래픽 및 기타 여러 개체에도 적용됩니다.

Count 속성을 사용하여 컬렉션의 개체 수를 쉽게 찾을 수 있습니다. 예를 들어 다음을 사용하여 Tables 컬렉션의 개체 수를 반환하므로 문서에있는 테이블 수를 알아낼 수 있습니다.

iNumTables = ActiveDocument.Tables.Count

현재 테이블을 찾는 것은 약간 까다 롭지 만 할 수 있습니다. 가장 간단한 방법은 현재 테이블에 책갈피를 추가 한 다음 문서의 모든 테이블을 검사하여 해당 책갈피가 포함 된 테이블을 확인하는 것입니다. 그것을 찾으면 현재 테이블이 어느 테이블인지 알고 책갈피를 삭제할 수 있습니다. 다음 매크로는 이러한 단계를 구현합니다.

Sub FindTableNumber()

Dim J As Integer     Dim iTableNum As Integer     Dim oTbl As Table

Selection.Bookmarks.Add ("TempBM")

For J = 1 To ActiveDocument.Tables.Count         Set oTbl = ActiveDocument.Tables(J)

oTbl.Select         If Selection.Bookmarks.Exists("TempBM") Then             iTableNum = J             Exit For         End If     Next J     ActiveDocument.Bookmarks("TempBM").Select     ActiveDocument.Bookmarks("TempBM").Delete     MsgBox "The current table is table " & iTableNum End Sub

매크로를 사용하려면 삽입 지점이 원하는 표 안에 있는지 확인하기 만하면됩니다. 매크로는 테이블이 분할되고 조작되는 경우와 같이 더 큰 컨텍스트에 쉽게 적용 할 수 있습니다.

그러나 Mary가 수행하려는 기본 작업을 프로그래밍 방식으로 처리하는 또 다른 방법이 있습니다.이 방법은 Tables 컬렉션에 인덱스 번호를 사용할 필요가 없습니다. 테이블의 첫 번째 행을 복사 한 다음 다음과 유사한 명령을 사용하여 테이블을 분할 할 수 있습니다.

Selection.Tables(1).Split(5)

이 명령은 행 5에서 테이블을 분할합니다. 분할되는 행을 변경하여 분할 지점을 쉽게 변경할 수 있습니다. 그런 다음 다음 명령을 사용하여 삽입 포인터를 다음 테이블 (새로 만든 테이블)의 시작 부분으로 이동할 수 있습니다.

Selection.GoTo What:=wdGoToTable, Which:=wdGoToNext

이 명령은 다음 표의 시작 부분으로 이동 한 다음 이전에 복사 한 머리글 행을 붙여 넣을 수 있습니다.

_ 참고 : _

이 페이지 (또는 WordTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / wordribbon-WordTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_WordTips_는 비용 효율적인 Microsoft Word 교육을위한 소스입니다.

(Microsoft Word는 세계에서 가장 널리 사용되는 워드 프로세싱 소프트웨어입니다.)이 팁 (10897)은 Office 365의 Microsoft Word 2007, 2010, 2013, 2016, 2019 및 Word에 적용됩니다. Word의 이전 메뉴 인터페이스 :

link : / word-Index_Number_for_the_Active_Table [활성 테이블의 색인 번호].