Получить содержимое элементов управления в Word 2007

24.03.2011 14:33

Прочитано: 4931

В документе есть элементы управления Текст, Дата, Поле со списком, нужно получить данные из них. Пробовал по-всякому, не выходит. Заранее благодарен за помощь

Yandex

Возможно, вас также заинтересует

E_Migachev

25.03.2011 08:56

Ответ № 1

(0) Meskalito, посмотрите приложенный файлик Скачивать файлы может только зарегистрированный пользователь!

В нем все о word.application

Mokey

25.03.2011 09:36

Ответ № 2

(1) E_Migachev, а такой же по экселю есть?

E_Migachev

25.03.2011 10:47

Ответ № 3

(2) Mokey, не прям такое, но все же: excel.application - Скачивать файлы может только зарегистрированный пользователь!

Meskalito

25.03.2011 10:50

Ответ № 4

Спасибо, но там далеко не всё. Там нет описания обращений к элементам управления текстом. Проблема именно в этом. В Word 2007 почему-то не получается напрямую обращаться к текстовому полю, как в 2003. Возможно нужно указать сначала к какой коллекции он относится или что-то вроде того. Так что вопрос остаётся открытым.

E_Migachev

25.03.2011 10:56

Ответ № 5

тогда только на msdn.microsoft.ru искать *09

Meskalito

25.03.2011 11:15

Ответ № 6

Всё что связанно с *.microsoft.* как правило сплошной гемор.. Не нашел я там конкретики на эту тему. Может плохо искал конечно...

Mokey

25.03.2011 11:20

Ответ № 7

(3) E_Migachev, благодарю

Mokey

25.03.2011 11:26

Ответ № 8

(4) Meskalito, попробуйте через метод Range
Например:

Код 1C v 8.х

 

Текст = Новый СписокЗначений();

Для К=1 по Word.Paragraphs.Count Цикл

    Текст.Добавить(Word.Paragraphs(К).Range.Text);  

КонецЦикла;

Meskalito

25.03.2011 12:12

Ответ № 9

Нужно не перебрать весь текст, а обратиться к конкретному именованному полю. С перебрать то проблем нет..

Meskalito

29.03.2011 16:05

Ответ № 10

Ну что, никто не знает....

Meskalito

31.03.2011 13:01

Ответ № 11

Лююююди!!! Ну подскажите плиз!!!!

E_Migachev

31.03.2011 14:22

Ответ № 12

(11) Meskalito, попробуй через макросы VBA, посмотри как он обращается

Meskalito

01.04.2011 13:40

Ответ № 13

Макросы не помогли, но разобрался.

Meskalito

01.04.2011 13:43

Ответ № 14

//Перебор элементов управления текстом
Объект = ПолучитьCOMОбъект(Путь);
Объект.Application.Visible = 1;
Word = Объект.Application;
ThisDocument = Word.Documents(1);
ThisDocument.Activate();
Для Строка = 1 По 14 Цикл
Значение = ThisDocument.ContentControls.Item(Строка);
Сообщить(Значение.Range.Text);
КонецЦикла;

Подсказка: Для выделения Кода используйте (в редакторе).