Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / WORD: Работа с таблицами из Access / 2 сообщений из 2, страница 1 из 1
15.12.2004, 12:17:11
    #32828177
Vsevolod V
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
WORD: Работа с таблицами из Access
Создаю таблицу, заполняю ее (.Tables(1)....). Далее делаю еще одну таблицу, пытаюсь к ней обратиться как .Tables(2).... , но выдается ошибка, что нет такого объекта.
Работает вот так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Set w = New Word.Application
w.Visible = True
With w.Selection
.Tables.Add Range:=w.Selection.Range, NumRows:= 1 , NumColumns:= _
         6 , DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
        wdAutoFitFixed
.Tables( 1 ).Cell( 1 ,  1 ). ...... работа с таблицой

.MoveDown Unit:=wdLine, Count:= 1 
        .TypeParagraph

.Tables.Add Range:=w.Selection.Range, NumRows:= 1 , NumColumns:= _
         6 , DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
        wdAutoFitFixed

.Tables( 1 ).Cell( 1 ,  1 ). ...... работа с таблицой
End With
То есть после добавления второй таблицы к ней нужно обращаться так же, как и к первой.
Видимо это связано с Range:=w.Selection.Range, но я не уверен :)
В чем тут загвоздка?
...
Рейтинг: 0 / 0
16.12.2004, 02:26:18
    #32829437
NG
NG
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
WORD: Работа с таблицами из Access
А визуально таблицы разделены пустым параграфом?
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / WORD: Работа с таблицами из Access / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]