Pergunte aqui
1

Macro da caixa de diálogo: Exportar como PDF

perguntadas 2017-10-01 21:15:18 +0200

imagem do gravatar de Orlando

updated 2019-03-01 19:05:04 +0200

Já pesquisei aqui e não encontrei.

Estou tentando gravar uma macro para abrir a caixa de diálogo abaixo: Exportar como PDF, mas não consigo!

.

Menu

.

Caixa de diálogo

Seria possível?

.

Grato pela atenção!

Orlando Souza

8)

editar alterar tag assinalar como ofensivo fechar mesclar Excluir

1 Resposta

1

respondidas 2017-10-01 22:16:09 +0200

imagem do gravatar de Orlando

updated 2017-10-05 14:59:01 +0200

Ooops! Já consegui, como segue:

sub ExportarComoPDF
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dim args1(2) as new com.sun.star.beans.PropertyValue

dispatcher.executeDispatch(document, ".uno:ExportDirectToPDF", "", 0, args1())

end sub

.

Obrigado!

Orlando Souza

=)

editar assinalar como ofensivo Excluir Link mais
Login/Registrar para responder

Ferramentas de perguntas

1 seguidor

Estatísticas

Perguntadas: 2017-10-01 21:15:18 +0200

Lidas: 77 vezes

Última atualização: Oct 05 '17