0

アプリケーション用の MS Word VB の範囲変数の範囲を、MS Word ドキュメントの 3 番目の表の 3 列目に設定できるかどうかを調べようとしています。

これまでのところ、これはコードを壊さずに取得できる限り近いものです。

Set range = ActiveDocument.Tables(3).range

デバッガーが狂わずにそこに Columns(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
4

1 に答える 1

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
于 2012-11-20T21:30:08.183 に答える