[求助]表格命名问题

leisureguy

在WORD中我原来一直用Table(1),Table(2)等索引方式来访问，但是一旦表格结构变化时（比如加了一个表格）编写的VB程序就要改一遍。有一次听说可以给表格起一个名字，以后访问只需要用table(名字)即可。

我想请教是否真有此种操作，若有如何在WORD中为一个表格命名。

谢谢

守柔

QUOTE:

以下是引用leisureguy在2007-8-18 7:29:19的发言：

在WORD中我原来一直用Table(1),Table(2)等索引方式来访问，但是一旦表格结构变化时（比如加了一个表格）编写的VB程序就要改一遍。有一次听说可以给表格起一个名字，以后访问只需要用table(名字)即可。

我想请教是否真有此种操作，若有如何在WORD中为一个表格命名。

谢谢

可以使用书签把表格“固定”。

Sub Example()

    Me.Bookmarks("myBK").Range.Tables(1).Select

End Sub

表格的Tables.Item(index)中，Index 只能为 Long 类型的值，表明单个对象的序号位置。

可以使用ID属性标识表格，但不能直接引用该标识，如：

Sub Test()

    Dim oTable As Table

    Me.Tables(2).ID = "abc"

    For Each oTable In Me.Tables

        If oTable.ID = "abc" Then

            oTable.Select

            Exit For

        End If

    Next

End Sub

[此贴子已经被作者于2007-8-18 10:08:14编辑过]