Libreoffice writer - Vertragsvorlage

[duddinho]

Guten Tag,

ich bin neu hier im Forum und möchte mich auch demnächst nochmal genauer vorstellen

Ich komme gleich zu meiner Frage:
Ich habe das Forum durchsucht, aber leider kein passendes Thema zu meinem Problem gefunden, deshalb habe ich diesen thread geöffnet:

Ich habe im libreoffice writer eine Dokumentvorlage erstellen, genauer gesagt eine Vorlage eines Vertrages.
Diese Vorlage soll nun für die Verträge der nächsten Monate immer als Ausgangspunkt verwendet werden.
Jeder neue Vertrag unterscheidet sich natürlich von den vorhergehenden, in dem gewisse Daten ausgetauscht werden. Das Grundgerüst ist jedoch immer das selbe.

Ich habe mir überlegt, es wäre super, wenn ich eine separate calc-Tabelle machen kann (für jeden Vertrag separat), bei der es dann die in dieser Tabelle eingetragenen pro Vertrag individuellen Daten automatisch in die ursprüngliche writer-Vorlage an den von mir gewünschten Stellen einfügt (mittels Verknüpfung). Ich fülle praktisch die Calc Tabelle mit meinen Daten aus, und aufgrund der Verknüpfung von writer und Zellen der Calc-Datei entsteht der fertig ausgefüllte Vertrag.

Ist so etwas möglich?

Wenn ja, wie geht das?
Wenn nein, gibt es Alternativvorschläge?


Ich bedanke mich im Vorab für die Informationen, sollte der Thread nicht in der richtigen Kategorie sein, bitte ich diesen zu verschieben.

Grüße

[pmoegenb]

Ich habe mir überlegt, es wäre super, wenn ich eine separate calc-Tabelle machen kann (für jeden Vertrag separat), bei der es dann die in dieser Tabelle eingetragenen pro Vertrag individuellen Daten automatisch in die ursprüngliche writer-Vorlage an den von mir gewünschten Stellen einfügt (mittels Verknüpfung). Ich fülle praktisch die Calc Tabelle mit meinen Daten aus, und aufgrund der Verknüpfung von writer und Zellen der Calc-Datei entsteht der fertig ausgefüllte Vertrag.
Ist so etwas möglich? Wenn ja, wie geht das?

Über DDE-Verknüpfungen. Dafür müssten aber die Tabellen bereits bestehen.

Wenn nein, gibt es Alternativvorschläge?

Ich würde dafür Platzhalter verwenden.

[lorbass]

Ist so etwas möglich?

Ja.

Wenn ja, wie geht das?

Dazu bietet sich die Serienbrieffunktion an:
Erstellung eines Serienbriefs
Writer-Handbuch, Kapitel 11: Die Serienbrieffunktion benutzen

Alternativvorschläge?

Ich verstehe nicht, warum du für jeden Vertrag eine eigene Calc-Datei spendieren willst. Wenn du nicht nur erfasst, druckst und abspeicherst, sondern irgendwann auch mal vertragsübergreifend auswerten willst, wäre es besser, alle Vertragsdaten in einer Datei zu verwalten. Und wenn es keinen zwingenden Grund für Calc gibt, wäre 'ne „richtige“ Datenbank noch besser.

Gruß
lorbass

[duddinho]

Danke für die Infos

Das mit den DDE habe ich nicht ganz verstanden.

Wenn in "einfügen" - "bereich" auswähle, was muss ich dann genau auswählen?
Und wie kann ich auf eine bestimmte Zelle meiner getrennten Calc-Tabelle verweisen?


Platzhalter sind zwar gut, aber wenn ich in meinem Vertrag z.B. einen Begriff mehrmals benötige, möchte ich ihn nur 1 mal eingeben müssen, und ihn sollte es dann an den entsprechenden Stellen automatisch schreiben:
z.B. Der Vertragswert steht auf Seite 3 und Seite 5. Ich möchte ihn nur 1 Mal schreiben, und es sollte ihn dann auf beiden Stellen einfügen.
Glaube, das geht mit den Platzhaltern nicht so gut?

[miesepeter]

Platzhalter sind zwar gut, aber wenn ich in meinem Vertrag z.B. einen Begriff mehrmals benötige, möchte ich ihn nur 1 mal eingeben müssen, und ihn sollte es dann an den entsprechenden Stellen automatisch schreiben:

Da wäre für dich z.B. ein Benutzerfeld von Vorteil:

Menü Einfügen > Feldbefehl > Andere > Variablen > Benutzerfeld :: Namen und Wert eingeben, Format: Text

Dort kannst du einen Platzhaltertext einfügen (z.B. 50.000 m²).
Wenn du dir die Feldbefehle anzeigen lässt, dann besitzen diese einen grauen Hintergrund; sehr gut zu erkennen...
Du kannst den eingefügten Feldbefehl jetzt kopieren und an anderen Stellen wieder einfügen. Beim Doppelklick auf einen dieser Feldbefehle kann der Wert editiert werden (z.B. 3000 hl); die Aktualisierung wirkt sich auf alle eingefügten Werte dieses einen Feldbefehls aus.

Es wird also nur einmal eingegeben und dann an den anderen Stellen ohne weiteres Zutun wiederholt.

War's das, was du meintest?
Ciao

[duddinho]

Perfekt, danke

Da kann ich dann ja am Ende des Dokumentes die Daten untereinander aufliste, die ich ausfülle, und sie werden oben im Vertrag automatisch ergänzt.

Masterfrage: Wie kann ich einstellen, dass es mir diesen unteren Bereich nicht mit-ausdruckt? Bzw, kann ich gewisse Textpassagen einstelle, dass es sie beim Drucken "verbirgt"? Danke

[lorbass]

Masterfrage: Wie kann ich einstellen, dass es mir diesen unteren Bereich nicht mit-ausdruckt? Bzw, kann ich gewisse Textpassagen einstelle, dass es sie beim Drucken "verbirgt"?

Nee, nee! Bätschäla – höchstens

1. Entweder aktivierst du die Option [✓] Ausgeblendet unter Format → Zeichen… → Schrifteffekt und deaktivierst die Option [ ] Versteckter Text unter Extras → Optionen… → LibreOffice Writer → Drucken
2. oder du fügst einen Bereich ein (Einfügen → Bereich…) oder an, für den du die Option [✓] Ausblenden aktivierst
   (ausgeblendete Bereiche erreichst du über den Navigator [F5])
3. oder du fügst einen Rahmen ein (Einfügen → Rahmen…), für den du die Option [ ] Drucken deaktivierst

Die Alternativen 2 und 3 habe ich zwar nicht getestet, die Chancen stehen aber nicht schlecht

Gruß
lorbass

[aha8]

Falls jemand viel mit Bereichen arbeitet hätte ich da noch ein kleine Helfer-Skript. Es ist nicht allein auf meinem Mist gewachsen, ich kann aber nicht mehr sagen, woher die Idee kam (möglicherweise von Andrew Macro, aber wie gesagt, keine Gewähr).

Code: Alles auswählen

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

Sub Main
	Dim oTextSections as Object
	Dim oDlgModel, oModel, oDlg, oWin as Object
	Dim iHeight, iWidth as Integer

	oTextSections = ThisComponent.getTextSections()
	iHeight = 30+16*oTextSections.getCount()
	iWidth = 170

	oDlgModel = CreateUnoService("com.sun.star.awt.UnoControlDialogModel")
	oDlgModel.setPropertyValue("Width", iWidth)
	oDlgModel.setPropertyValue("Height", iHeight)
	oDlgModel.setPropertyValue("Title", "Textbereiche ein/ausblenden")
	
	for i=0 to oTextSections.getCount()-1
		Dim oSection as Object
		oSection = oTextSections.getByIndex(i)
		oModel = oDlgModel.createInstance("com.sun.star.awt.UnoControlCheckBoxModel")
		oModel.setPropertyValue("Width", 48)
		oModel.setPropertyValue("Height", 12)
		oModel.setPropertyValue("PositionX", 16)
		oModel.setPropertyValue("PositionY", iHeight - 30 - 8 -16*i)
		oModel.setPropertyValue("Label",  oSection.name())
		if oSection.isVisible then
			oModel.setPropertyValue("State", 1)
		else
			oModel.setPropertyValue("State", 0)
		end if
		oDlgModel.insertByName(oSection.name(), oModel)
	next
	
	oModel = oDlgModel.createInstance("com.sun.star.awt.UnoControlButtonModel")
	oModel.setPropertyValue("Label", "OK")
	oModel.setPropertyValue("Width", 48)
	oModel.setPropertyValue("Height", 12)
	oModel.setPropertyValue("PositionX", iWidth - 8 - 48 - 8 - 48)
	oModel.setPropertyValue("PositionY",  iHeight - 8 - 12)
	oModel.setPropertyValue("PushButtonType", com.sun.star.awt.PushButtonType.OK)
	oDlgModel.insertByName("okButton", oModel)
	
	oModel = oDlgModel.createInstance("com.sun.star.awt.UnoControlButtonModel")
	oModel.setPropertyValue("Label", "Abbrechen")
	oModel.setPropertyValue("Width", 48)
	oModel.setPropertyValue("Height", 12)
	oModel.setPropertyValue("PositionX", iWidth - 8 - 48)
	oModel.setPropertyValue("PositionY",  iHeight - 8 - 12)
	oModel.setPropertyValue("PushButtonType", com.sun.star.awt.PushButtonType.CANCEL)
	oDlgModel.insertByName("cancelButton", oModel)
	
	oDlg = CreateUnoService("com.sun.star.awt.UnoControlDialog")
	oDlg.setModel(oDlgModel)
	
	oWin =  CreateUnoService("com.sun.star.awt.Toolkit")
	oDlg.createPeer(oWin, null)
	
	if oDlg.execute() = 1 then
		for i=0 to oTextSections.getCount()-1
			oSection = oTextSections.getByIndex(i)
			oSection.isVisible = oDlg.getControl(oSection.name()).state = 1
		next
	end if

End Sub

Einfach in ein eigenes Makro kopieren, über Extras → Anpassen einen Eintrag in einem Menü oder einer Toolbar anlegen und per Knopfdruck erscheint eine Liste, in der jeder Bereich des aktuellen Dokumentes per Häkchen ein- oder ausgeschaltet werden kann. (Sind keine Bereiche vorhanden erscheinen nur die beiden Aktions-Buttons.)

Ich verwende das Skript hauptsächlich um in meiner Vorlage für amtliche Schreiben Teile des Absenders (Email, Telefon, Fax, Handy) nach Bedarf ein- oder auszublenden.

[duddinho]

Danke

Jetzt ist es mir aber fast zu blöd noch etwas zu fragen...

Wenn ich z.b. meine Feldbefehle auf der letzten Seite (z.b. Seite 13/13) ausfülle, und ausblende, dann drückt es mir 13 Seiten, und die letzte ist dann einfach eine weiße Seite. Kann ich dazu auch einstellen, dass es mir diese Seite, mit dem Makro, nicht mitdruckt? Also sozusagen, ein Makro, das ausblendet und die letzte weiße Seite (auf der nur die ausgeblendeten Daten stehen) nicht drucken?

[miesepeter]

• oder du fügst einen Rahmen ein (Einfügen → Rahmen…), für den du die Option [ ] Drucken deaktivierst

Ich würde das nehmen. Fügst du den Rahmen in der ersten Seite ein, Verankerung an der Seite. Solange du ihn bearbeitest, Umlauf=Durchlauf, wenn du den Text des Vertrags bearbeitest, dann Umlauf=ImHintergrund. Fontfarbe helles Grau oder Blaugrau, so dass, wenn im Hintergrund, der Text des Vordergrunds gut gelesen werden kann... Bearbeitung der Benutzerfelder durch Doppelklick, falls das nicht geht (war bei mir so, LO 3.6.5.2 unter WindowsXP), dann rechte Maustaste...

Gibt dann keine Probleme beim Ausdruck, Leerseiten etc.
Ciao