Listenfelder aktualisieren

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: Listenfelder aktualisieren

Re: Listenfelder aktualisieren

von Geotrans » Mi, 20.02.2013 20:39

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

Re: Listenfelder aktualisieren

von F3K Total » Mo, 18.02.2013 23:18

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

Listenfelder aktualisieren

von Geotrans » Mo, 18.02.2013 21:46

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
Dateianhänge
neu13.odb
(106.45 KiB) 71-mal heruntergeladen

Nach oben