Здравствуйте! Помогите, пожалуйста!
Я программирую в Lotus Notes, раньше создавал отчеты при момощи VBA в MS office:
Set xl=CreateObject("Excel.Application")
Set xlWbk=xl.Workbooks.Add
xl.Visible=True
xlWbk.ActiveSheet.Cells(1,1) = "отчет"
Теперь возникла необходимость избавиться от MS из-за некоторых
обстоятельств :) Поэтому нужно из VBA через OLE добраться до листа
OpenOffice документа. Пока наковырял только это:
Forall o In rtitem.EmbeddedObjects
Set handle=o.Activate(True)
Set document = handle.CurrentController.Frame
End Forall
или так: Set xl=CreateObject("opendocument.CalcDocument.1")
А вот дальше не получается.