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
134
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
Tänään pyörit ajatuksissa enemmän, kun erehdyin lukemaan palstaa
En saisi, silti toivon että sinä vielä palaat ja otetaan oikeasti selvää, hioituuko särmät ja sulaudummeko yhteen. Vuod225494- 324810
- 282731
- 342354
- 372058
- 152008
En ole koskaan kokenut
Ennen mitään tällaista rakastumista. Tiedän että kaipaan sinua varmaan loppu elämän. Toivottavasti ei tarvitsisi vain ka191647- 121601
- 231472
Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...
Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons251449