Excel вставка объекта из файла

[Furanium]

День добрый.
Суть вопроса в следующем, начал готовить на Дельфи отчеты в Эксель. Все замечательно - импорт и экспорт данных с Экселем, форматирование текста, все на уровне, пока не решил включить в отчет объект из файла. Объект как правило схема, схема нарисована либо в Visio, либо в AutoCAD.
При решении вопроса поступил следющим образом: записал макрос вставки из файла в Экселе, посмотрел как устроен, решил адаптировать его под Дельфи и сразу возникла проблема, после осуществленной вставки объекта в Эксель в приложении Дельфи постоянно появляется ошибка "Вызов был отклонен", незнаю как решить.
Полагаю вопрос решается очень просто, но поверхностное познание материала не позволяет разрешить ситуацию.

try //проверяем есть-ли объект 'Excel.Application'
   VExcel := GetActiveOleObject('Excel.Application'); 
  except
    on EOLESysError do
      VExcel := CreateOleObject('Excel.Application'); //нет, создаем
  end;


   VExcel.WorkBooks.Add(opendialog1.FileName); //открываем шаблон
   VExcel.WorkSheets[1].Activate; //активируем первый лист

   VExcel.ActiveSheet.Range['B12'].Select; //выделем ячейку, для того чтобы вставить объект с ячейки
   VExcel.ActiveSheet.OLEObjects.Add(Filename:='H:\FileName.vsd', Link:=True, DisplayAsIcon:=False).Select; //вставлем объект из файла
//далее сообщение об ошибке

Попутно возникли другие вопросы, которые появятся в перспективе с решением основного:
1) Объект вставляется с уже имеющимися некими размерами, как узнать размеры этого объекта длинну и ширину?
2) Как установить произвольный размер по ширине/высоте, с пропорциональным произвольным размером по высоте/ширине?(схему небходимо разместить в ограниченных рамках, по высоте или ширине)