如何识别MS Word宏的第三个表的第三列

时间:2012-11-20 18:45:41

标签: vba ms-word

我试图找出是否可以将MS Word VB中的范围变量的范围设置为MS Word文档中第三个表的第三列的应用程序。

到目前为止,这与我没有破坏代码的情况一样接近:

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

1 个答案:

答案 0 :(得分: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