Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.18;
Скачать: CL | DM;

Вниз

Word   Найти похожие ветки 

 
Plt   (2002-07-04 10:26) [0]

Здрасте всем. Как узнать индекс рисунка в параграфе или предложении документа Word.


 
AFROLOV ©   (2002-07-04 10:46) [1]

Почитай про свойства Range и Selection в справке по VBA.


 
Plt   (2002-07-04 11:17) [2]

читал я уже про них, может че не заметил, подскажи плз. Через Range.InLineShapes могу узнать высоту и ширину и еще кучу не ненужной мне инфы, а номер его не хочет показывать.


 
AFROLOV ©   (2002-07-04 11:53) [3]

Тупой переборный вариант (но работает как правило достаточно быстро), адаптируешь и доработаешь его сам
Если твой объект MyPicture
Вариант 1:
for i:=1 to Range.InLineShapes.count do
begin
if (Range.InLineShapes.range.start=MyPicture.range.start and Range.InLineShapes.range.end=MyPicture.range.end) then
begin
PicNum:=i;
break;
end;
end;

Данная проверка основана на том, что в офисе объекты рисунки не могут в точности накладываться друг на друга.

Вариант 2:


MyPicture.range.Id:="Мой объект";
for i:=1 to Range.InLineShapes.count do
begin
if (Range.InLineShapes.range.Id=MyPicture.range.Id) then
begin
PicNum:=i;
break;
end;
end;

Данная проверка основана на том, что объекту range можно присвоить уникальное имя.



 
Plt   (2002-07-05 13:37) [4]

Все у меня получилось, огромное спасибо!



Страницы: 1 вся ветка

Текущий архив: 2002.07.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.017 c
14-58268
Алекс21
2002-06-20 14:02
2002.07.18
где можно скачать RX-LIB? Подскажите пожалуйста.


7-58334
BigCat
2002-04-26 19:21
2002.07.18
печать в файл (графика)


1-58061
werr
2002-07-05 17:04
2002.07.18
Как узнать каким юзером занят файл?


1-58189
ricks
2002-07-06 01:02
2002.07.18
Toolbar ы


3-58011
Cranium
2002-06-27 11:53
2002.07.18
IB, запросы, визуальные компоненты?