[Gelöst] Inhalt von Textfeldern von Formular1 in Formular2

[Gunpriest]

Morgen

Ich habe hier ein Problem, das ich bis jetzt noch nicht knacken konnte.

Ich habe 2 Formulare:

Formular1 = Kundenverwaltung
Formular2 = Kunden in Angebote übertragen

In Formular1 wird der aktuelle Datensatz per Textfelder angezeigt. Per Button öffnet sich Formular2, mit auszufüllenden Textfeldern und Textfeldern, die mit dem Inhalt von ein paar Textfeldern aus Formular automatisch gefüllt werden sollen.

Derzeit sieht mein Makro so aus:

Code: Alles auswählen

Sub Kunden_in_Angebote_eintragen
	oDoc = ThisComponent
	Form = oDoc.drawpage.forms.getbyindex(0)
	var1 = Form.getByName("txtName 1") 'speichert Textfeld aus Formular "Kundenverwaltung" in eine Variable
	
	REM öffnet das Formular "Kunden in Angebote eintragen"
	ThisDatabaseDocument.FormDocuments.getByName( "Kunden in Angebote eintragen" ).open
	
	MsgBox var1.Text 'zur Kontrolle
end sub

Das funktioniert auch, aber wie geht es weiter? Wie kriege ich var1 in ein Textfeld in dem Formular "Kunden in Angebote eintragen"?

[DPunch]

Aloha

Code: Alles auswählen

ThisDatabaseDocument.FormDocuments.getByName( "Kunden in Angebote eintragen" ).open

liefert Dir eine Referenz auf das neu geöffnete Formular.

Mit der Zuweisung

Code: Alles auswählen

newDoc = ThisDatabaseDocument.FormDocuments.getByName( "Kunden in Angebote eintragen" ).open

kannst Du danach also mit newDoc so arbeiten, wie Du es auch mit Deinem oDoc tust.

Code: Alles auswählen

(...)
newDoc = ThisDatabaseDocument.FormDocuments.getByName( "Kunden in Angebote eintragen" ).open
newForm = newDoc.Drawpage.Forms.getByIndex(0)
(...)

[Gunpriest]

Ah, ok, danke! Werde ich mal ausprobieren

Ich habe gestern Abend aber noch eine andere Lösung gefunden. Ich habe globale Variablen definiert, befülle diese mit einem Makro im Formular1 und fülle mit einem anderen Makro in Formular2 die Textfelder mit den globalen Variablen.