Dokumentissa on 18 taulukkoa(välilehteä). Tarvis tulostaa ne jokainen omaan pdf-tiedostoon. pdf-tiedoston nimi pysyy aina samana.
Yritin nauhoittaa makron, mutta makro tulosti aina koko satasivuisen työkirjan.
Voisi olla joko yksi makro, joka tekisi kaikki välilehdet kerralla tai joka välilehdellä oma nappi.
Calc tulostusmakro
jrax
1
187
Vastaukset
- ...
Sub ExportSheetToPDF
oDoc = ThisComponent
oFrame = oDoc.getCurrentController().getFrame()
' range to store
oObj = oDoc.getSheets().getByIndex(0)
dispatcher = CreateUnoService("com.sun.star.frame.DispatchHelper")
Dim aArg(0) As New com.sun.star.beans.PropertyValue
aArg(0).Name = "Selection"
aArg(0).Value = oObj
Dim aArgs(2) As New com.sun.star.beans.PropertyValue
aArgs(0).Name = "URL"
aArgs(0).Value = "file:///C:/test/01994.pdf"
aArgs(1).Name = "FilterName"
aArgs(1).Value = "calc_pdf_Export"
aArgs(2).Name = "FilterData"
aArgs(2).Value = aArg
dispatcher.executeDispatch(oFrame, ".uno:ExportToPDF", "", 0, aArgs)
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Ruotsissa uusi vakava ongelma: Vanhusten seksuaalinen hyväksikäyttö
palvelutaloissa ja kotihoidossa. Tämäkin on ihan puhtaasti väärän maahanmuuton vaikutusta, sillä tekijät ovat kaikki keh902169Työeläkkeiden maksaminen lopetettava ASAP.
"Vanhimmat sukupolvet ovat saaneet vastinetta eläkemaksuilleen moninkertaisesti nykyisiin ja tuleviin sukupolviin verr1391797- 1731333
- 229805
- 65754
Järkytys uutisten ystäville - Huomenta Suomen kesään iso muutos
Huomenta Suomi on monen suomalaisen vakio-ohjelma. Suorana nähtävä Huomenta Suomi seuraa päivän tärkeimpiä uutisia, pol10731- 60730
Trumpille jälleen voitto
Trump ensin tuhosi Iranin ydinohjusprojektin, jotta ko. terroristivaltio ei voisi aiheuttaa ydinsotaa. Ja nyt Trump pako212623- 49587
Haluan teidät molemmat elämääni
Toista rakastan todella syvästi, ja toinen on kuin paras ystävä minulle. En voi luopua kummastakaan... </347560