[Решено] Как с помощью LO Basic скопировать лист Calc из одной книги в другую

[ost]

Доброго.

Поможите, как скопировать oSheetSource  в oBookTarget. Спасибо.

Код Выделить Развернуть


Dim noArgs()
sSheet = "Лист1"
oSheetSource = ThisComponent.Sheets.getByName(sSheet)
sURL = "private:factory/scalc"
oBookTarget = StarDesktop.LoadComponentFromUrl(sURL, "_blank", 0, noArgs())


[sokol92]

Код Выделить Развернуть

oBookTarget.Sheets.importSheet ThisComponent, sSheet,  oBookTarget.Sheets.Count  ' после последнего листа

[ost]

Спасибо. То что нужно.