имена таблиц

[Ринат]

в ворде есть таблицы, как явно указать имя таблицы,
в vb code стоит
Set myTable = ActiveDocument.Tables(1)
где указать явно имена таблицы в ворде (не в коде)
или как написать, чтобы код работал в указанной таблице, но не в других таблицах
спасибо

[Naeel Maqsudov]

"Указанной" это какой? Где стоит курсор?

Если курсор находится где-то в таблице (а может и выделена чатсть ячеек) то обратиться к окружающей целой таблице не сложно:

Код: Выделить всё

Sub qwe()
Dim r As Range
  Set r = Selection.Range
  r.Expand wdTable
  If r.Tables.Count = 0 Then
    MsgBox "Встаньте в таблицу, мать Вашу"
  Else
    r.Tables(1).ЧтоТоСделать
  End If
End Sub

[Ринат]

спасибо, проблема успешно решена