Seite 1 von 1

Textvorlagen mit Inhalt füllen

Verfasst: Fr, 30.09.2011 10:59
von claves
Guten Tag lieben OOo-Gemeinde :-)

Mein System:
Windows 7 / Windows Server 2008 r2 mit OOo 3.2.1

Ich bin ein leihe was Programmieren angeht ich bitte um nachsicht :-)

Problem: Ich habe eine Vorlage erstellt mit Adressbereich, Kopf und Fusszeile.
Diese Vorlage soll nun Grundlage für die ca. 1400 alten Dokumente sein.

Mein Lösungsansatz war ich kopiere den Inhalt der Dokumente und füge Ihn in der Vorlage ein und dann save as - bäm fertig.

Aber es scheiter schon am Copy Paste ;)

Ich würde gerne den Inhalt des Cursors in eine Variable packen und diese dann einfüge wenn es geht mit der kompletten Formatierung.

Code: Alles auswählen

Sub Test
	oDoc=thisComponent
	oText=oDoc.text

	oCursor=odoc.text.createtextcursor()  
	  oCursor.gotoEnd(true)

	tCursor=odoc.text.createtextcursor()
		tCursor.gotoEnd(true)	

wText = oCursor
oText.insertString(tCursor, wText, true)
End Sub
vielen Dank für Eure Hilfe

wenn jemand gute Tuturials zur Hand immer her damit ...

Gruß
claves

Re: Textvorlagen mit Inhalt füllen

Verfasst: Fr, 30.09.2011 13:59
von claves
nu gehts :)
einfach dat bissel Code dazu und dat grundgerüst ist fertig. :-)

Code: Alles auswählen

DIM wText
wText = oCursor.string