Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/9: Рейтинг темы: голосов - 9, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 31.01.2012
Сообщений: 15

Задать ширину столбцов в таблице MS WORD 2007

02.12.2015, 15:54. Показов 1950. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
При смене MS WORD с 2003 на 2007(в 2003 такой проблемы не было) в строке 5:

C++
1
2
3
4
5
6
Doc.OlePropertyGet("Tables").OleProcedure("Add",Range,10,6,1,1);
Table=Doc.OlePropertyGet("Tables").OleFunction("Item",1);
Cell=Table.OleFunction("Cell",1,i);
Cell.OleFunction("Select");
Cell.OlePropertyGet("Range").OlePropertyGet("Columns").OlePropertySet("Width",30);
Cell.OlePropertySet("VerticalAlignment",1);
возникает ошибка:
Project raised exception class EOleSysError

Судя по всему, дело именно в OlePropertySet("Width",30), т.к если убрать этот фрагмент, таблица нормально формируется. Подскажите, как тогда правильно задать ширину столбца?
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
02.12.2015, 15:54
Ответы с готовыми решениями:

Как задать ширину столбцов таблиц в MS Word?
Здравствуйте! Создаю отчет из SQL-запроса в таблицу MS Word на C++ Builder-е. Ниже приведен часть кода, где создается таблица и...

Как задать ширину одновременно для всех столбцов в таблице?
К примеру у меня есть таблица из 3 колонок и мне нужно, чтобы ширина каждой колонки равнялась 1/3 ширины окна браузера, как можно это...

Как задать ширину столбцов dataGridView
Сам датагрид заполняю так : da = new SqlDataAdapter(@" SELECT id_certificat as '№', ...

3
 Аватар для Sasha
4956 / 2420 / 531
Регистрация: 05.06.2008
Сообщений: 7,518
Записей в блоге: 3
02.12.2015, 22:23
А так?
C++
1
2
3
4
5
 Variant vVarTable=vVarDoc.OlePropertyGet("Tables").OleFunction("Item",1);
 Variant t = vVarTable.OlePropertyGet("Columns");
 t.OleFunction("Item",3).OlePropertySet("Width",110);
 t.OleFunction("Item",4).OlePropertySet("Width",150);
 t.OleFunction("Item",11).OlePropertySet("Width",110);
1
0 / 0 / 0
Регистрация: 31.01.2012
Сообщений: 15
03.12.2015, 10:00  [ТС]
Для всех столбцов работает:
C++
1
t.OlePropertySet("Width",50);
Но если устанавливать ширину для каждого по отдельности, по-прежнему нет
C++
1
t.OleFunction("Item",1).OlePropertySet("Width",50);
Добавлено через 49 минут
Исправил последний параметр с 1 на 0 и заработало:
C++
1
Doc.OlePropertyGet("Tables").OleProcedure("Add",Range,rows,columns,1,0);
0
0 / 0 / 0
Регистрация: 26.11.2015
Сообщений: 3
05.01.2016, 12:33
Работаю с MS Word 2007.
Есть только две строки кода:
C++
1
2
vVarApp = CreateOleObject("Word.Application");
vVarApp.OlePropertySet("Visible", true);
И даже при таком коде вылетает сообщение от Ворда - "Неверно указана единица измерения". После нажатия на кнопку OK, дальше Ворд нормально открывается.

Подскажите, пожалуйста, не было ли случаем такого?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
05.01.2016, 12:33
Помогаю со студенческими работами здесь

Задать программно ширину столбцов DataGridView
Загружаю данные в DataGridView из Excel. Первые столбцы 0-2 всегда присутствуют им задаю в программе ширину. В Excel файлах может быть...

Как менять ширину столбцов в таблице
Все нормально работает но к примеру когда y=11.62 граница смещается. Тема с условием задачи ...

Excel: Как задать ширину столбцов в новом листе
Собственно. Создаю рабочий лист, кидаю данные. using Excel = Microsoft.Office.Interop.Excel; Excel.Application newExcel = new...

Сделать нумерацию в таблице Word 2007, но не автонумерация(нумерованный список)
subj...

Word. Как задать связь между примерной областью текста в документе и значением в таблице?
Я что-то вот даже не могу сообразить, как железобетонно указать именно это место, чтобы его значение, или... какой там параметр, привязать...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&d=1772460536 Одним из. . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru