[gelöst]Writer und Textbausteine

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: [gelöst]Writer und Textbausteine

Re: Writer und Textbausteine

von der_Zerstreute » Mi, 25.03.2015 21:53

hi und ...

Super Danke !!...
Sorry das ich erst jetzt schreibe, war lange nicht mehr hier online da ich viel um die Ohren hatte .. Aber damit hast du mir sehr geholfen ;).

Re: Writer und Textbausteine

von F3K Total » Do, 06.11.2014 19:12

Hi,
ist einfach, anbei eine kleine Beispieldatei,
mit diesen Makros:

Code: Alles auswählen

Sub S_Insert_Text(SName,sText)
    oDrawpage = Thiscomponent.Drawpage
    for i = 0 to oDrawpage.count - 1
        oTextfield = oDrawpage(i)
        if oTextfield.Name = sName then
            oTextfield.String = sText
            exit for
        endif
    next i
End Sub

Sub S_Text_1
    sText = "Mein Text 1"
    S_Insert_Text("TB1",sText)
end sub
    
Sub S_Text_2
    sText = "Mein Text 2"
    S_Insert_Text("TB2",sText)
end sub
De3m ersten Textfeld habe ich den Namen "TB1" und dem zweiten den Namen "TB2" gegeben
HTH R
Dateianhänge
Insert_Textcontent.odt
(13.19 KiB) 110-mal heruntergeladen

Re: Writer und Textbausteine

von der_Zerstreute » Do, 06.11.2014 18:34

hat hier immer noch keiner ne Idee wie das gehen könnte ?? :/

[gelöst]Writer und Textbausteine

von der_Zerstreute » Do, 20.02.2014 09:19

Hallo Leute ,

ich grübel seit einiger Zeit darüber nach wie ich Textblöcke im Writer per Makro mit Inhalt füllen kann.
Kurz zur Erläuterung :

Ich habe eine Writer Dokument erstellt welches eine auf Papier gedrucke Vorlage "ausfüllen" soll. Sprich ich mußte die einzelnen Textstellen frei auf dem Blatt positionieren können. Ich habe mich für das Zeichenwerkzeug "Text" entschieden, da man diese Textblöcke frei auf der Seite verschieben kann.
Nun möchte ich gern per Dialogfenster und Makro in diese Textblöcke (keine Ahnung wie sie richtig heißen) Text eintragen. Leider finde ich nirgends einen Hinweis wie ich dort Irgendetwas hineinschreiben könnte.

Geht das überhaupt - oder muß ich am Ende auf Formularfelder zurückgreifen. Das würde ich nur äußerst ungern machen da die Formatierung der Textblöcke deutlich einfacher ist.

Ich würde mich freuen wenn Ihr mir hierbei helfen könntet.

Daniel

Nach oben