Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Word
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.06.2011, 09:29   #11
DJTreeno
Форумчанин
 
Регистрация: 09.06.2011
Сообщений: 146
По умолчанию

Вот вроде как я понимаю как сделать но синтаксис хромает на обе руки и ноги.

Получается, если сделать что-то вроде

Dim i As Integer
Bookmarks("_1370160208").Index = i
ActiveDocument.Tables(i).Select
DJTreeno вне форума Ответить с цитированием
Старый 23.06.2011, 09:31   #12
DJTreeno
Форумчанин
 
Регистрация: 09.06.2011
Сообщений: 146
По умолчанию

Стоп!!!

Вот этот код выполнился:

ThisDocument.Bookmarks("_1370160208 ").Select
DJTreeno вне форума Ответить с цитированием
Старый 23.06.2011, 10:17   #13
DJTreeno
Форумчанин
 
Регистрация: 09.06.2011
Сообщений: 146
По умолчанию

Но вот этот код

With Selection.Tables(?)

Не работает

Значит получается выделить нужную таблицу ThisDocument.Bookmarks("_1370160208 ").Select

Теперь как то надо ее определить

типа:
Dim MyTab As Table

MyTab = Selection

Помогите с синтаксисом пожалуйста!
DJTreeno вне форума Ответить с цитированием
Старый 23.06.2011, 10:31   #14
DJTreeno
Форумчанин
 
Регистрация: 09.06.2011
Сообщений: 146
По умолчанию

Этот код доже не выполняется

Dim MyTab As Table
ThisDocument.Bookmarks("_1370160208 ").Select
Set MyTab = ActiveDocument.Sections
DJTreeno вне форума Ответить с цитированием
Старый 23.06.2011, 19:44   #15
Ципихович Эндрю
Старожил
 
Регистрация: 24.01.2011
Сообщений: 3,056
По умолчанию

Цитата:
Сообщение от DJTreeno Посмотреть сообщение
Вот этот код работает:

ActiveDocument.Tables(3).Select

Но привязки к конкретной таблице нет, этой 3-ей таблицей может быть любая.

Пожалуйста помогите, очень Вас прошу!!!
нет конечно же 3-я есть 3-я!!!!!
Что Вы всё заладили которая связана с Excel которая связана с Excel которая связана с Excel
Что касается которая связана с Excel ничем не могу помочь
Вы просили к конкретной таблице-какой???
Ципихович Эндрю вне форума Ответить с цитированием
Старый 23.06.2011, 22:55   #16
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
По умолчанию

Спокойствие, только спокойствие!
Связанная с Excel таблица - это поле. Если в документе одно это поле, его можно выделить как

activedocument.Fields(1).Select

Если могут быть еще поля, надо перебирать поля в цикле и анализировать код поля:

activedocument.Fields(i).Code
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Старый 24.06.2011, 05:46   #17
Ципихович Эндрю
Старожил
 
Регистрация: 24.01.2011
Сообщений: 3,056
По умолчанию

>Связанная с Excel таблица - это поле
OK между {} у него что написано????
Ципихович Эндрю вне форума Ответить с цитированием
Старый 24.06.2011, 09:03   #18
DJTreeno
Форумчанин
 
Регистрация: 09.06.2011
Сообщений: 146
По умолчанию

Танцуя с бубном я нашел более менее подходящий выход, привязать макрос к конкретной таблице можно через разрыв раздела:

ThisDocument.Sections(2).Range.Tabl es(1).Select

Если учесть, что я сделал структуру документа и каждая глава в книге это отдельный файл со своими четко определенными разделами, которые добавлять нет необходимости, то этот метод работает на все 100%, при этом таблицы, к которым нужно привязать макрос выделяются в отдельный раздел.

Ну пока как-то так...
DJTreeno вне форума Ответить с цитированием
Старый 24.06.2011, 15:25   #19
Ципихович Эндрю
Старожил
 
Регистрация: 24.01.2011
Сообщений: 3,056
По умолчанию

1
Вы можете ответить на сообщение № 17??
2
Как Вы так копипастите Tabl es - почему пробел??
3
Имею в документе таблицу с 5 столбцами 22 строками
что надо добавить чтобы строка кода
Код:
ThisDocument.Sections(2).Range.Tables(1).Select
выполнялась???
Ципихович Эндрю вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
выполнение макроса по завершении редактирования конкретной ячейки Обыватель Microsoft Office Excel 2 20.05.2010 11:52
Создание кнопки и привязка макроса НеВа6464 Microsoft Office Excel 2 11.11.2009 20:57
Слияние шаблона с данными из таблице, и как подсичтать значение количества полей в таблице n4ela Microsoft Office Access 3 07.03.2009 12:04
Запуск макроса с параметрами из другого макроса Saladin Microsoft Office Excel 2 19.01.2009 09:43
Привязка макроса к кнопке VisuaL Microsoft Office Excel 7 10.05.2008 07:04