Внести текст в ячейку таблицы 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 минут
А кто знает, как выделить определенный фрагмент текста, с такого-то символа по такой-то?

Новые блоги и статьи Все статьи Все блоги /
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .

@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 Супер-модератор 33398 / 21508 / 8236 Регистрация: 22.10.2011 Сообщений: 36,906 Записей в блоге: 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