Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/21: Рейтинг темы: голосов - 21, средняя оценка - 4.67
1 / 1 / 0
Регистрация: 16.10.2011
Сообщений: 69
1

Word Поиск таблицы в документе

18.04.2014, 15:50. Показов 3848. Ответов 2
Метки нет (Все метки)

Есть документ, содержащий 2 заполненные таблицы
Visual Basic
1
Set Table = ActiveDocument.Range(Start:=ActiveDocument.Range.Start, End:=ActiveDocument.Range.End).Tables(2)
Если параметр в Tables равен 1, то таблица находится и обрабатывается без проблем, иначе появляется ошибка 5941 "Запрашиваемый номер семейства не существует", не понимаю в чем проблема
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.04.2014, 15:50
Ответы с готовыми решениями:

Создание таблицы в документе MS Word из таблицы Excell
Приветствую! Нужна Ваша помощь! Появилась необходимость вставить таблицу word в определенное...

Поиск абзацев в документе Word
Помогите пожалуйста! На РГЗ задание последнее надо сделать, а я не знаю как. VBA не шарю, если б на...

Поиск картинок в документе Word
1)Как получить список всех картинок что есть в документе? 2)Как бы перетащить такой найденный...

Поиск раскрашенного текста в документе Word
Привет всем! Подскажите, пожалуйста, каким образом средствами VBA в открытом документе Word...

2
Модератор
Эксперт MS Access
10141 / 4142 / 673
Регистрация: 07.08.2010
Сообщений: 11,646
Записей в блоге: 4
18.04.2014, 16:02 2
Visual Basic
1
2
3
4
5
6
DIM J1
''Проверка количества таблиц в документе
J1=ActiveDocument.Range(Start:=ActiveDocument.Range.Start, End:=ActiveDocument.Range.End).Tables
IF J1>=2 THEN
Set Table = ActiveDocument.Range(Start:=ActiveDocument.Range.Start, End:=ActiveDocument.Range.End).Tables(2)
ENDIF
1
15031 / 6358 / 1726
Регистрация: 24.09.2011
Сообщений: 9,976
18.04.2014, 16:22 3
Лучший ответ Сообщение было отмечено SkyFlyStaR как решение

Решение

Коллеги,
Visual Basic
1
ActiveDocument.Range(Start:=ActiveDocument.Range.Start, End:=ActiveDocument.Range.End)
это то же самое, что
Visual Basic
1
ActiveDocument.Range
Добавлено через 4 минуты
... а количество таблиц в теле документа
Visual Basic
1
ActiveDocument.Tables.Count
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.04.2014, 16:22

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Поиск слов в документе средствами Word
Есть какая нибудь функция реализующая алгоритм стандартного поиска Word`а ? Просто перебор...

Поиск и подсветка найденного в документе Word
Здравствуйте! Кто-нибудь может помочь с макросом? Необходимо в Вордовском документе находить...

Поиск в документе Word через Find, но с конца документа к его началу
Здравствуйте, как организовть поиск в документе Ворд Финдом но с конца документа к его началу ...

Поиск во всем документе Word, включая колонтитулы, надписи, примечания и сноски
Задание: Разработать приложение позволяющее производить поиск во всем документе, включая...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.