2014-12-18 2 views
1

Microsoft Word 2013 문서에서 모든 테이블을 선택하고 내용을 자동 완성하는 방법에 대한 방법을 (또는 알맞은 소개) 찾고 있습니다. 각 테이블은 서로 독립적이며 텍스트로 구분됩니다.VBA 매크로를 사용하여 Microsoft Word 문서의 모든 테이블을 선택하는 방법

는 지금까지 다음 코드 설립

:

Sub autofit() 

    Selection.Tables(1).AutoFitBehavior (wdAutoFitContent) 

End Sub 

개별 테이블 및 상기 테이블의 모든 컬럼에 대한 작동, 나는 "루프"의 형식을 이해하지만 방법에 찔러 싶습니다 내 개별 선택을 전체 문서로 변환합니다.

이것은 내 첫 번째 게시물이므로 놓친 모든 규정에 사과드립니다.

답변

2

모두 매우 단순합니다.

Dim t As Table 
For Each t In ActiveDocument.Tables 
    t.AutoFitBehavior wdAutoFitContent 
Next 
+0

우수 감사합니다. ActiveDocument를 인식하지 못했습니다. 기본 저는 알고 있습니다. 그러나 저는 VBA에 완전히 익숙하지 않습니다. – Cellobin22

관련 문제