Hola...
Creo, que solo te queda crear una macro y asignarla a un botón. Hace tiempo, en las listas de correo de OOo respondí una pregunta similar, te la copio aquí... la macro tiene la ventaja de que la puedes personalizar completamente a tu gusto...
Recuerden que en la barra de herramientas tenemos un botón para exportar
directamente a PDF, por default, ese botón les exporta, todas las "áreas
de impresión" definidas, ojo con esto, recuerden que en Calc, es muy
importante, para un óptimo proceso de impresión, definir correctamente
las áreas de impresión. Si requieren un mayor control de opciones al
exportar a PDF, siempre podemos usar el menú Archivo | Exportar a PDF...
donde nos mostrará un cuadro de diálogo con muchas más opciones de esta
herramienta, todas estas opciones las podemos controlar por código, con
un descriptor del filtro (FilterData). Para el caso concreto de
seleccionar la hoja deseada, usamos el siguiente código, que, asume se
ejecuta desde una hoja de Calc y que, muy importante, "ya están
definidas las áreas de impresión"...
- Código: Seleccionar todo Expandir vistaContraer vista
Option Explicit
Sub ExportarPDF()
Dim oDoc As Object
Dim sTipoDoc As String
Dim mOpciones(1) As New "com.sun.star.beans.PropertyValue"
Dim mOpcFiltro(0) As New "com.sun.star.beans.PropertyValue"
dim sRuta As string
BasicLibraries.LoadLibrary( "Tools" )
'Referencia al documento desde donde se llama la macro
oDoc = ThisComponent
'Establecemos el rango de páginas, en este caso, solo la 2
mOpcFiltro(0).Name = "PageRange"
mOpcFiltro(0).Value = "2"
'Establecemos el nombre del filtro, PDF
mOpciones(0).Name = "FilterName"
mOpciones(0).Value = "calc_pdf_Export"
'Establecemos los datos del filtro
mOpciones(1).Name = "FilterData"
mOpciones(1).Value = mOpcFiltro
'Construimos la ruta correcta, usamos el mismo directorio
'y nombre del archivo, solo agregamos la extension PDF
sRuta = GetFileNameWithoutExtension( oDoc.getUrl ) & ".pdf"
'Guardamos el archivo
oDoc.storeToURL( sRuta, mOpciones() )
End Sub
Solo te queda asociar esta macro a un botón nuevo de la barra de herramientas.
En el descriptor del filtro (FilterData), reitero, podemos establecer
TODAS las opciones de exportación que ven en el cuadro de diálogo
manual, si alguien necesita saber el uso de alguna en especial, solo
expongalo para mostrar un ejemplo.
Por favor, si esto responde, edita el título de tu primer mensaje para agregarle la etiqueta [RESUELTO] de este modo tenemos foros más ordenados, gracias.
Saludos