Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

21 Ноябрь 2017, 16:42 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Доступно и просто о работе в офисных пакетах
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: 1   Вниз
  Печать  
Автор Тема: Узнать, есть ли картинка, привязанная к ячейке?  (Прочитано 107 раз)
0 Пользователей и 1 Гость смотрят эту тему.
dndn
Пользователь
**
Offline Offline

Сообщений: 93



WWW
« Стартовое сообщение: 2 Ноябрь 2017, 15:31 »

Уважаемые гуру ОпенОфиса!
Возникла такая задачка - узнать программно, макросом, есть ли картинка, привязанная к ячейке Calc. И если есть, то прочесть ее подноготную - адрес картинки и ее размер.
Буду премного благодарен.  Всё хорошо
« Последнее редактирование: 2 Ноябрь 2017, 15:43 от dndn » Записан
rami
Гуру
*******
Online Online

Пол: Мужской
Сообщений: 2 291


MacBook Pro, LibreOffice и Apache OpenOffice


« Ответ #1: 2 Ноябрь 2017, 16:01 »

Никаких картинок в ячейках нет, все графические объекты находятся в графических листах по одному на каждый табличный лист. Нужно получить DrawPage и перебрать его содержимое по типу. Если нужно узнать привязку. Если это то, что нужно, узнать "подноготную".
Записан

dndn
Пользователь
**
Offline Offline

Сообщений: 93



WWW
« Ответ #2: 2 Ноябрь 2017, 16:10 »

rami, огромное спасибо. А есть пример, как это выглядит в макросе? Или ткните в мануал, пжлст... Непонимающий
« Последнее редактирование: 2 Ноябрь 2017, 16:13 от dndn » Записан
rami
Гуру
*******
Online Online

Пол: Мужской
Сообщений: 2 291


MacBook Pro, LibreOffice и Apache OpenOffice


« Ответ #3: 2 Ноябрь 2017, 16:21 »

rami, огромное спасибо. А есть пример, как это выглядит в макросе? Или ткните в мануал, пжлст... Непонимающий
Вот пример, куда смотреть:
Код:
Sub Main
Dim obj, CellNane
obj=ThisComponent.DrawPages().getByIndex(0).getByIndex(0)  'на листе должен быть хотябы один графический объект
CellNane=obj.Anchor.AbsoluteName  'адрес привязки
End Sub

Но вообще нужно уточнять детали, что бы узнать тот ли это объект.
Записан

dndn
Пользователь
**
Offline Offline

Сообщений: 93



WWW
« Ответ #4: 2 Ноябрь 2017, 16:23 »

rami спасибо большое, буду копать. Веселый
По результату обязательно отпишусь.
Записан
Страниц: 1   Вверх
  Печать  
 
Перейти в:  

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2006-2009, Simple Machines Valid XHTML 1.0! Valid CSS!