Форум: "Основная";
Текущий архив: 2002.07.18;
Скачать: [xml.tar.bz2];
Вниз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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c