w dokumencie mam ponizsze makro :
Kod: Zaznacz cały
sub doXLS
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
dim url as string
Dim aLocale As New com.sun.star.lang.Locale
aLocale.Language = "pl"
aLocale.Country = "PL"
document = ThisComponent
fileName ="Operacyjny"
dim args7(1) As New com.sun.star.beans.PropertyValue
args7(0).Name = "InteractionHandler"
args7(0).Value = ""
args7(1).Name = "FilterName"
args7(1).Value = "MS Excel 97"
Properties1(1).Name = "FilterFlags"
Properties1(1).Value = "44,34,0,1"
document.storeToURL(ConvertToURL("C:/test/" & fileName & ".xls"),Properties())
end sub
celem jest by dany arkusz w rozbudowanym pliku zapisal sie jako oddzielny plik xls bez formul .. tylko obraz
niestety po powyzszym zapisie otrzymuje przy probie otwarcia pliku Operacyjny.xls, ze jest on niezgodny z zapisanym formatem i excel odczytuje go jako zwykly plik tekstowy ...
podejrzewam, ze uzylem zlych "filterflags", ale pewnosci nie mam
bardzo prosze o pomoc
pozdrawiam