export PDF mit anschließendem automatischen Öffnen im reader

[xg10]

Hallo,

ich möchte wenn ich einen Export in PDF speicher, das sich diese PDF automatisch im Adobe Reader öffnet.

Was ist zu tun?

schöne Grüße

Gerhard

[miesepeter]

Hallo,

über Menü Datei... PDF-Export definieren. In deinem Betriebssystem muss außerdem der Acrobat Reader als Standardanwendung für PDF-Öffnen festgelegt sein.

MitPDF-AnzeigeprogrammOeffnen.png (8.49 KiB) 2222 mal betrachtet

[xg10]

Das führt leider nicht zum gewünschten Erfolg.
Hatte ich so schon ausprobiert, muss aber weiterhin jede Datei im Explorer manuell mit dem Reader öffnen.

schöne Grüße
Gerhard

[Stephan]

Das führt leider nicht zum gewünschten Erfolg.
Hatte ich so schon ausprobiert, muss aber weiterhin jede Datei im Explorer manuell mit dem Reader öffnen.

schöne Grüße
Gerhard

Hast Du gelesen das:

"In deinem Betriebssystem muss außerdem der Acrobat Reader als Standardanwendung für PDF-Öffnen festgelegt sein."

denn das ist der Kernpunkt, nicht die Einstellung beim PDF-Export, die ja nichts weiter bewirkt als das Links im PDF, die ja erst angeklickt werden können wenn das PDF geöffnet ist, wiederum im PDF-Betrachter geöffnet werden.


Gruß
Stephan

[xg10]

Der Adobe Acrobat Reader DC ist das Standartprogramm zum öffnen von PDF Dateien

Die von OO Clac in dem PDF Format exportierten Dateien werden nach Doppelklick im entsprechenden Ordner auch mit dem Reader geöffnet.

Vielleicht erkläre ich nochmal was ich möchte.

Ich exportiere ein odt Datei in einer PDF Datei, benenne die Datei abcde.PDF und speicher diese DPF Datei im vorgesehen Ordner.
Die Datei wird gespeichert und OO Calc in der Ansicht vor der Speicherung am Destop angezeigt.

Jetzt öffne ich im Explorer Order, die abcde.PDF Datei, die mir im Adobe Reader angezeigt wird.

Ich möchte das unmittelbar nach Speichern der abcde.PDF Datei diese im Reader geöffnet wird und im Vordergrund auf dem Destop angezeigt wird.

Wir haben vor einigen Jahren Betrieblich WIN mit OO und Adobe Reader genutzt und da war dieses Verhalten Standard

schöne Grüße
Gerhard

[Mondblatt24]

Hallo Gerhard,
sicher das Du OpenOffice meinst und nicht LibreOffice, denn dort gibt es diese Einstellmöglichkeit in den PDF-Optionen.

Bild-1 2020-11-29 13 54 29.png (93.11 KiB) 2069 mal betrachtet

Gruß
Peter

[Stephan]

Wie schon mein Vorredner schreibt gibt es das in OO nicht.

Du kannst es per Makro ergänzen, z.B.:

Code: Alles auswählen

Option Explicit

dim document as object
dim dispatcher as object
dim args1(3) as new com.sun.star.beans.PropertyValue

dim sFilePickerArgs
dim auswahl
Dim antwort
dim tc As Object
dim pdf_datei As String


Sub Main
	tc = ThisComponent
	document   = tc.CurrentController.Frame
	dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
	
	'Dateiauswahl
	sFilePickerArgs = Array(com.sun.star.ui.dialogs.TemplateDescription.FILESAVE_AUTOEXTENSION)
	auswahl = createunoservice("com.sun.star.ui.dialogs.FilePicker")
	With auswahl
		.initialize(sFilePickerArgs())
		.SetMultiselectionMode(False)
		.appendFilter("PDF-Dokument (pdf)", "*.pdf")
		.setDefaultName(tc.Title)
	End With
	antwort = auswahl.execute
	if antwort = 1 then
			pdf_datei = auswahl.Files(0)
		Else
			Exit Sub
	end if
	
	rem ----------------------------------------------------------------------
	
	args1(0).Name = "URL"
	args1(0).Value = pdf_datei
	args1(1).Name = "FilterName"
	args1(1).Value = "writer_pdf_Export"
	args1(2).Name = "FilterData"
	args1(2).Value = ""
	args1(3).Name = "SelectionOnly"
	args1(3).Value = false
	
	Dim x
	x = dispatcher.executeDispatch(document, ".uno:ExportTo", "", 0, args1())
	
	If x.Result = False Then Exit Sub
	
	Wait 100
	
	Dim starten as object 
	starten = createUnoService("com.sun.star.system.SystemShellExecute") 
	starten.execute(ConvertToUrl(pdf_datei), "", 0)

End Sub

Ich habe das mal in eine Extension gepackt, lade die angehängte Extension herungter und installiere sie in OO per Extensionmanager. Starte OO neu und Du hast nun im Datei-menü einen Eintrag namens "PDF-Export und Vorschau..."



Gruß
Stephan