🙏 Helfen Sie jetzt mit, unser LibreOffice Forum zu erhalten! 🙏
Mit Ihrer Spende sichern Sie den Fortbestand, den Ausbau und die laufenden Kosten dieses Forums. 🌱

🍀 Jeder Beitrag zählt – vielen Dank für Ihre Unterstützung!🍀

❤️ DANKE >> << DANKE ❤️

>> Dank Ihrer Unterstützung -> Keine Werbung für alle registrierten LibreOffice-Forum User! <<
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗

Sirienbrief

Alles zur Programmierung im LibreOffice.
Antworten
michaelf2k
Beiträge: 2
Registriert: Mi 20. Mär 2013, 14:26

Sirienbrief

Beitrag von michaelf2k » Mo 8. Apr 2013, 09:10

Hallo

ich hätte da mal ne Frage. Ich habe mein Dokument schon mit den entsprechenden Seriendruckfeldern gefüllt.
Gibt es eine Möglichkeit einen Serienbrief automatisiert zu erstellen?
Quasi so, dass ich das mit einem Makro evtl machen könnte, also wenn ich den Serienbrief öfnne und gleichzeitig mit dem Makro und ich dann einen fertigen Serienbrief habe.
Beispielsweise so
"C:\Program Files (x86)\OpenOffice.org 3\program\swriter.exe" "macro://dokumentname/Standard.Module1.serienDruckStarten()" "C:\Dokumentpfad"
oder ein macro das einfach nur die funktion "drucken" startet?
LG

michaelf2k
Beiträge: 2
Registriert: Mi 20. Mär 2013, 14:26

Re: Sirienbrief

Beitrag von michaelf2k » Mo 8. Apr 2013, 12:54

REM ***** BASIC *****

Code: Alles auswählen

Sub drucken
	Dim mPrintopts1(), x as Variant
    Dim oDocument As Object, oPrinter As Object
    oDocument = ThisComponent 
    '**** spezieller Drucker
    'Dim mPrinter(0) As New com.sun.star.beans.PropertyValue
    'mPrinter(0).Name="Name"
    'mPrinter(0).value="\\NTPQ_TMT-HP4345MFP**"     ' name des druckers
    'oDocument.Printer = mPrinter() 
    '****
    oDocument.Print(mPrintopts1())  'Standarddrucker
End Sub
das macro hier startet die drunkfunktion, jedoch überspringt es die Abfrage von OO ob die Felder gefüllt werden sollen

pmoegenb

Re: Sirienbrief

Beitrag von pmoegenb » Mo 8. Apr 2013, 15:49

Vielleicht kommst Du hiermit weiter.

Ach, da fällt mir gerade auf, Du heißt ja auch noch BenjaminN.


An alle, die das LibreOffice-Forum gern nutzen und unterstützen wollen:


Bitte helfen Sie uns mit 7 Euro pro Monat.
Durch Ihren Beitrag tragen Sie dazu bei, unsere laufenden Kosten für die kommenden Monate zu decken.
Unkompliziert per Kreditkarte oder PayPal.
Als ein kleines Dankeschön werden Sie im LO-Forum als SUPPORTER gekennzeichnet.



Antworten