Внести текст в ячейку таблицы Word

@Alex_From_777 · Регистрация: 22.04.2015

Студворк — интернет-сервис помощи студентам

Доброго времени суток.
Помогите решить следующую задачку.
Имеется файл .docx с таблицей.
Я его открываю, и пытаюсь внести текст в ячейку [1,1].
Но что я делаю неправильно? Ибо при выполнении строки vVarTable=vVarDoc.OlePropertyGet("Tables[1]"); возникает исключение EOLESystem Error 'Неизвестное имя'

C++
1
2
3
4
5
6
7
8
9
10
     vVarApp = CreateOleObject("Word.Application");
     vVarApp.OlePropertySet("Visible",true);
     vVarDocs=vVarApp.OlePropertyGet("Documents");
     vVarDocs.OleProcedure("Open", path.c_str(),false,0);
     vVarDoc=vVarDocs.OleFunction("Item",1);
     vVarDoc.OleProcedure("Activate");
 
     String text = "CONTROLL";
     vVarTable=vVarDoc.OlePropertyGet("Tables[1]");
     vVarTable.OlePropertyGet("Cell", 1,1).OlePropertyGet("Range").OlePropertyGet("Text")=text.c_str();

Подскажите, как получить доступ к таблицам, если они уже были созданы ранее в тексте.
Заранее благодарю.

@volvo · 01.10.2018, 15:19

Как минимум нужно:

C++
1
vVarTable = vVarDoc.OlePropertyGet("Tables").OleFunction("Item", 1);

@Alex_From_777 · 02.10.2018, 08:01 **[ТС]**

Сообщение от volvo

vVarTable = vVarDoc.OlePropertyGet("Tables").OleFunc tion("Item", 1);

Да, а затем еще я добавил:

C++
1
2
3
vVarCell = vVarTable.OleFunction("Cell", 1, 1);
RangeCell = vVarCell.OlePropertyGet("Range");
RangeCell.OlePropertySet("Text", text.c_str());

и получил, что хотел.

@archerix · 09.02.2020, 12:44

А какие библиотеки надо подключить, чтобы заработало CreateOleObject?

@volvo · 09.02.2020, 12:57

Сообщение от archerix

чтобы заработало CreateOleObject

, надо подключить файл ComObj.hpp. В Билдере, разумеется, этот код как раз для него и написан.

@archerix · 09.02.2020, 13:51

Спасибо. Перед кодом написано просто "С++", я подумал, что это как-то можно выкружить и в обычном С++.

Я с таким по Дельфи знаком, и мне интересно понять, возможно ли так же делать из обычного С++. То, что в Билдере оно есть, я знаю. Хотя по-моему, там это все как-то не так наглядно, как в Дельфи.

@archerix · 10.02.2020, 00:01

ComObj подключил, все равно неясно - а какого типа должно быть это vVar? Мне казалось, Variant или OleVariant, но компилятор их не понимает.

@volvo · 10.02.2020, 15:59

Это Variant-ы, и компилятор от borland-а их прекрасно понимает, ибо описан этот тип в модуле System, который подключается к любому проекту по умолчанию.

@archerix · 11.02.2020, 03:25

Ага, заработало, что-то сразу я напутал, видимо.

А вот такой вопрос - в примере открывается готовый документ. А как создать новый?

И еще - а как обозначается параметр - "пустышка" для методов документа и приложения?

Добавлено через 44 минуты
С первым вопросом разобрался.

C++
1
2
vVarDocs = vVarApp.OlePropertyGet("Documents");
vVarDocs.OleProcedure("Add");

@archerix · 11.02.2020, 11:12

Чего-то никак не удается просто добавить текст в Ворд, все время ругается на ошибки с типами

Пробовал так:

C++
1
2
vVarApp.OlePropertyGet("ActiveDocument").OlePropertyGet("Content")
                     .OleProcedure("InsertAfter",vtexty);

Или так, по-хитрому:

C++
1
2
3
4
vVarParagraphs=vVarDoc.OlePropertyGet("Paragraphs");
vVarParagraph=vVarParagraphs.OleFunction("Item",1);
vVarParagraph.OlePropertyGet("Range").
             OlePropertySet("Text","123");

Пока получилось только передавать по одному символу типа Char, при этом в документе возникает его номер, а не он сам

@volvo · 11.02.2020, 12:30

C++
1
2
vVarApp.OlePropertyGet("ActiveDocument").OlePropertyGet("Content")
                     .OleProcedure("InsertAfter", WideString(vtexty));

- никогда проблем не было...

@archerix · 11.02.2020, 13:59

Ну а у меня вот так вот

C++
1
2
3
4
5
6
stexty="123";
vtexty="Hello, World";
ctexty='a';
 
vVarApp.OlePropertyGet("ActiveDocument").OlePropertyGet("Content")
                     .OleProcedure("InsertAfter",vtexty);

Пробую подставлять их по очереди, переменные имеют тип строковый, вариант и чар соответственно. Работает только чар, и то странно - вместо буквы передается ее код. Остальные выкидывают сообщение об ошибке типов.

Добавлено через 9 минут
Попробовал передать вот так, нашел в интернете вроде бы работающий пример

C++
1
stexty.c_str()

Передался первый символ, после чего программа упала. У меня Билдер какой-то неправильный что ли?

Добавлено через 57 минут
А кто-то пробовал пользовать Ворд путем подключения библиотеки MSWORD.OLB? Я правда, пока не могу вникнуть как ее подключить. Примеры кода выглядят как-то более удобно и привычно, чем тут.

@archerix · 12.02.2020, 13:48

И открыть существующий файл тоже не выходит. Тут stexty - строка.

C++
1
2
3
4
   stexty = "D:\testB.docx";
   wrd = CreateOleObject("Word.Application");
   wrd.OlePropertySet("Visible",true);
   wrd.OlePropertyGet("Documents").OleProcedure("Open", stexty.c_str());

Вылетает сообщение, что файл не найден, а в скобочках приписка - 'D:\%09est'. Что бы это значило?

Добавлено через 6 минут
Такое чувство, что строка с названием файла передается не полностью, часть символов в конце отбрасывается.

@liv · 12.02.2020, 13:52

Сообщение от archerix

"D:\testB.docx"

C++
1
"D:\\testB.docx"

@archerix · 12.02.2020, 13:58

Так изначально было написано - тогда вылетала ошибка "Неверное имя каталога". Собственно, потому и попробовал с одной чертой для опыту

Весь мозг сломал уже, не знаю, что еще попробовать.

Название, расширение и само наличие файла десять раз перепроверено. Пробовал эту строку из переменой забивать в консоль - запускается.

@archerix · 13.02.2020, 03:24

Вроде удалось угадать - надо передавать текст как WideString. Интересно это только у меня так оригинально?

@archerix · 13.02.2020, 12:56

Можно тут спросить - а как таким образом выполнять поиск и замену в Ворде? Или лучше создать новую тему? В найденных в тырнете статьях не увидел такого

@archerix · 14.02.2020, 01:36

Ну ладно, сам делюсь результатами изысканий в тырнетах и опытов

Функция "заменить все", насколько понимаю. У меня работает.

C++
1
2
vVarApp.OlePropertyGet("Selection").OlePropertyGet("Find").OleProcedure("Execute", WideString("World"),
                               false, false, false, false, false, true, 1, false, WideString("Planet"), 2);

И есть такая расшифровка параметров:

OleProcedure ("Execute",
s1/*Текст, который будем менять*/,
false/*учитывать регистрe*/,
false/*Только полное слово*/,
false/*Учитывать универсальные символы*/,
false/*Флажок Произносится как*/,
false/*Флажок Все словоформы*/,
true/*искать вперед*/,
1/*Активация кнопки Найти далее*/,
false/* Задание формата */,
s2/*На что заменить*/,
2/*Заменить все*/);

Добавлено через 58 минут
А кто знает, как выделить определенный фрагмент текста, с такого-то символа по такой-то?

Новые блоги и статьи Все статьи Все блоги /
Access VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .	Фото: Daniel Greenwood kumehtar 13.11.2025

@archerix 2 / 2 / 1 Регистрация: 08.02.2020 Сообщений: 215
	09.02.2020, 12:44
	А какие библиотеки надо подключить, чтобы заработало CreateOleObject? 0

@archerix 2 / 2 / 1 Регистрация: 08.02.2020 Сообщений: 215
	09.02.2020, 13:51
	Спасибо. Перед кодом написано просто "С++", я подумал, что это как-то можно выкружить и в обычном С++. Я с таким по Дельфи знаком, и мне интересно понять, возможно ли так же делать из обычного С++. То, что в Билдере оно есть, я знаю. Хотя по-моему, там это все как-то не так наглядно, как в Дельфи. 0

@archerix 2 / 2 / 1 Регистрация: 08.02.2020 Сообщений: 215
	10.02.2020, 00:01
	ComObj подключил, все равно неясно - а какого типа должно быть это vVar? Мне казалось, Variant или OleVariant, но компилятор их не понимает. 0

@volvo Супер-модератор 33187 / 21484 / 8232 Регистрация: 22.10.2011 Сообщений: 36,861 Записей в блоге: 12
	10.02.2020, 15:59
	Это Variant-ы, и компилятор от borland-а их прекрасно понимает, ибо описан этот тип в модуле System, который подключается к любому проекту по умолчанию. 0

@archerix 2 / 2 / 1 Регистрация: 08.02.2020 Сообщений: 215
	12.02.2020, 13:58
	Так изначально было написано - тогда вылетала ошибка "Неверное имя каталога". Собственно, потому и попробовал с одной чертой для опыту Весь мозг сломал уже, не знаю, что еще попробовать. Название, расширение и само наличие файла десять раз перепроверено. Пробовал эту строку из переменой забивать в консоль - запускается. 0

@archerix 2 / 2 / 1 Регистрация: 08.02.2020 Сообщений: 215
	13.02.2020, 03:24
	Вроде удалось угадать - надо передавать текст как WideString. Интересно это только у меня так оригинально? 0

@archerix 2 / 2 / 1 Регистрация: 08.02.2020 Сообщений: 215
	13.02.2020, 12:56
	Можно тут спросить - а как таким образом выполнять поиск и замену в Ворде? Или лучше создать новую тему? В найденных в тырнете статьях не увидел такого 0