Сообщение:
Set handle=CreateObject("com.sun.star.ServiceManager")
Set CoreReflection= handle.createInstance("com.sun.star.reflection.CoreReflection")
Set Desktop= handle.createInstance("com.sun.star.frame.Desktop")
Dim args()
Set wbook= Desktop.loadComponentFromURL("file:///"&path,"_blank", 0,args)