VBA jak opět uložit načtený dokument
Napsal: 01 zář 2011 20:05
Přesněji jde o starbasic v OpenOffice makru:
Požadovaná akce = odpovídá stisku Ctrl-S (uložit pod stejným jménem)
Jenže volání storeToURL mi háže runtime error:
výjimka/Type:com.sun.star.task.ErrorCodeIOException
Kód: Vybrat vše
cImportFilter = "Text"
cExportFilter = cImportFilter
oImportOptions = Array( MakePropertyValue( "FilterName", cImportFilter ) )
oExportOptions = Array( MakePropertyValue( "FilterName", cExportFilter ) )
cName = "c:/dok/konverze RTF/*.rtf"
' ----------- OTEVŘÍT dokument -----------
oDoc = StarDesktop.loadComponentFromURL( ConvertToUrl( cName ), "_blank", 0, oImportOptions )
' ----------- ÚPRAVY v dokumentu -----------
' .....................................
' ----------- ULOŽIT dokument ----------- >>> ERROR
oDoc.storeToURL( ConvertToUrl( cName ), oExportOptions )
' ----------- ZRUŠIT dokument -----------
oDoc.dispose()
End SubJenže volání storeToURL mi háže runtime error:
výjimka/Type:com.sun.star.task.ErrorCodeIOException