Listenfelder aktualisieren

[Geotrans]

Ich bräuchte nochmals Hilfe, ich kriege es trotz einiger Treads zu dem Thema im Forum nicht hin.
Ich möchte in meinem Formular "factory" die beiden Listenfelder "InputGood" im Unterformular "InputGood" und "OutputGood" im Unterformular "OutputGood" aktualisieren, nach dem sich ein Wert im Formular "Good" geändert hat.
Meine bisherigen Versuche bringen nur Fehlermeldungen!

Code: Alles auswählen

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

Sub Aktualisieren_Good
   oDoc = thisComponent
   oDrawpage = oDoc.Drawpage
   oForm = oDrawpage.Forms(0)
   oListboxModel = oForm.getByName("InputGood")
   oListboxModel.refresh()
End Sub

[F3K Total]

Hi,

Code: Alles auswählen

Sub Aktualisieren_Good
   oDoc = thisComponent
   oDrawpage = oDoc.Drawpage
   oForm = oDrawpage.Forms(0)
   oListboxModel = oForm.getByName("InputGood").getByName("InputGood").getByName("Good_ID")
   oListboxModel.refresh()
End Sub

oForm -> MainForm
.getByName("InputGood") -> SubForm
.getByName("InputGood") -> Tabellenkontrollfeld
.getByName("Good_ID") -> Listboxspalte

Gruß R

[Geotrans]

Vielen Dank für die Hilfe und die Erklärung, damit habe ich jetzt auch die anderen Makros hin bekommen!