2012-11-20 2 views
0

MS에서 세 번째 테이블의 세 번째 열까지의 응용 프로그램에 대해 MS Word VB에서 범위 변수의 범위를 설정할 수 있는지 파악하려고합니다. Word 문서입니다.MS Word 매크로에 대한 세 번째 테이블의 세 번째 열을 식별하는 방법

는 내 코드 파괴하지 않고 얻을 수있는 지금까지이 가까운 거리

:

Set range = ActiveDocument.Tables(3).range 

인가가 나에게 (3) 거기에 디버거가 미친하지 않고 열에 대한 참조를 넣을 수있는 방법 ? 지금까지

내 코드 :

Set range = ActiveDocument.Tables(3).range 
With range.Find 
    .Text = "Passed" 
    .Format = True 
    .MatchCase = True 
    .MatchWholeWord = False 
    .MatchWildcards = False 
    .MatchSoundsLike = False 
    .MatchAllWordForms = False 
    Do While .Execute(Forward:=True) = True 
     iCount = iCount + 1 
    Loop 
End With 

답변

0

뭔가 같은 ...?

Dim col As Column 
Set col = ActiveDocument.Tables(3).Columns(3) 
col.Cells(1).Range.Text = "Abc" 
Debug.Print col.Cells(1).Range.Text 
+0

제안 해 주셔서 감사합니다. 하지만 셀 (1)을 어떻게 동적으로 만들 수 있습니까? 즉, 범위가 세 번째 열의 첫 번째 셀로 제한되지 않고 열의 모든 셀로 제한되도록하십시오. –

+0

For Each c col.Cells는 편도 일 것입니다. – Fionnuala

관련 문제