Neuigkeiten:

Ist euer Problem gelöst, dann bitte den Knopf "Thema gelöst" drücken!

Mobiles Hauptmenü

Bezug im Textfeld aus Unterformular wird nicht übernommen

Begonnen von JOG, August 15, 2012, 20:56:11

⏪ vorheriges - nächstes ⏩

JOG

Hallo

Ich stehe bei folgendem kleinen Problem momentan an:
Ich habe ein Navigationsformular mit diversen Unterformularen. Nun möchte ich im Unterformular "Wartungspläne" via eine Schaltfläche ein neues Formular "Wartungsdaten" öffnen und die ID-Nummer aus einem Kombifeld aus dem Unterformular "Wartungspläne" in das ID-Kombinationsfeld im geöffneten Fo "Wartungsdaten" übernehmen.
Ich habe das mit folgenden Code gelöst:


Private Sub Form_Load()
Me.InterneIDAnlage = Forms("frmWartungsPlaene")("cboInterneIDAnlage")
End Sub


Dabei wird der gewünschte Wert jedoch im Kombinationsfeld des Fo "Wartungsdaten" nicht übernommen, es sei den im löse die Prozedur über das Formular "Wartungspläne" aus, wenn ich dieses nicht über das Navigationsformular öffne (sondern direkt). Möchte die Prozedur jedoch über das Navigationsformular ansteuern.

Hat jemand eine Idee, weshalb dies auf diesem Weg nicht funktioniert?

Gruss Urs

DF6GL

Hallo,

mach das mal so:


Sub btnSchaltfläche_Click()
Docmd.OpenForm "frmWartungsPlaene",,,,acFormAdd,,Me!cboInterneIDAnlage
End Sub


Sub Form_Load()
If not IsNull (Me.Openargs) Then Me!InterneIDAnlage = Me.Openargs
End Sub



wobei die direkte "Übernahme" in das Textfeld die Gefahr des Überschreibens eines (des ersten angezeigten) Datensatzes birgt, wenn das Form nicht wie gezeigt, auf einen neuen DS positioniert wird.

Viele Grüße vom Bodensee
Franz, DF6GL

Hilfestellung:  http://www.access-o-mania.de/forum/index.php?topic=6969.msg118738#msg118738

Links und Tipps:
1.   http://v.hdm-stuttgart.de/~riekert/lehre/db-kelz/
1a. http://www.tinohempel.de/info/info/datenbank/normalisierung.htm
1b. https://support.office.com/de-de/article/Grundlagen-des-Datenbankentwurfs-eb2159cf-1e30-401a-8084-bd4f9c9ca1f5#bmterms
2.   http://www.donkarl.com
3.   https://web.archive.org/web/20201201233522/http://www.dbwiki.net/
4.   http://www.access-tutorial.de/
5.   http://www.tty1.net/smart-questions_de.htm
6.   http://access.joposol.com/accept

Last but not least:   < F1 > für Hilfe
;) Learning by doing not by spoon-feed ;)

Tipp: Find and Replace for Access

database

Hallo,

ungeachter der Vorschläge von DF6GL stimmt die Form des Verweises auf das Unterformular nicht.
Auch wenn sich ein Unterformular auf einem Navigationsform befindet ist und bleibt es ein UFo.

Me.InterneIDAnlage = Forms("frmWartungsPlaene")("cboInterneIDAnlage")

du kannst hier auch mal versuchen:

Me.InterneIDAnlage = Forms!DeinHauptformular!frmWartungsPlaene!cboInterneIDAnlage


Siehe für die richtige Syntax http://www.donkarl.com?FAQ4.2 sowie die darin zitierten Links!

JOG

Hallo Database

Jetzt hat's funktioniert. Das Problem war, dass der Bezug auf das Steuerelement im Hauptformular gefehlt hat, resp. entsprechend fehlerhaft war. Habs korrigiert und ich bin wieder ein Schrittchen weiter. Danke!

JOG ;D