Узнать, есть ли картинка, привязанная к ячейке?

Автор dndn, 2 ноября 2017, 15:31

0 Пользователи и 1 гость просматривают эту тему.

dndn

Уважаемые гуру ОпенОфиса!
Возникла такая задачка - узнать программно, макросом, есть ли картинка, привязанная к ячейке Calc. И если есть, то прочесть ее подноготную - адрес картинки и ее размер.
Буду премного благодарен.  :beer:

rami

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

dndn

#2
rami, огромное спасибо. А есть пример, как это выглядит в макросе? Или ткните в мануал, пжлст... ???

rami

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


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

dndn

rami спасибо большое, буду копать. :D
По результату обязательно отпишусь.