A
allex
Хочу фоново создать документ - делаю
потом вызружаю в него данные
а потом хочу его сделать видимым
Как поменять на
в том же объекте, не сохраняя подготовленный документ и впоследствии открывая его.
Код:
Dim mass(0)
Dim oRange,oRange1,oRange2, Border,StyleFamilies,PageStyles,DefPage,objCoreReflection
Dim sheets,document,Desktop,xlglob,xlWbk
*******Создание ООО - документа
Set xlglob = CreateObject ( "com.sun.star.ServiceManager" )
Set objCoreReflection= xlglob.createInstance("com.sun.star.reflection.CoreReflection")
Set mass(0) = xlglob.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
mass(0).name = "Hidden"
mass(0).value = True
Set Desktop = xlglob.createInstance("com.sun.star.frame.Desktop")
Set document = Desktop.loadComponentFromUrl("private:factory/scalc","_blank",0,mass())
а потом хочу его сделать видимым
Как поменять на
Код:
mass(0).name = "Show"
mass(0).value = True