Страница 1 из 1

имена таблиц

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

Добавлено: 17 мар 2005, 01:39
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

Добавлено: 21 мар 2005, 18:32
Ринат
спасибо, проблема успешно решена