Feld im Unterformular füllen

17/11/2009 - 09:36 von juergen zimmermann | Report spam
Hallo,
ich will vergeblich folgendes realisieren:
aus einem Unterformular soll mit Doppelklick ein Wert aus einem
Datensatz in ein anderes Unterformular in ein bestimmtes feld
eingetragen werden. Dazu habe ich mir folgenden Code gebastelt:
Access 2003



Private Sub Identnr_Kompl_DblClick(Cancel As Integer)
Dim VAR_IDENTNR_KOMPL
Dim stDocName As String



'übernehme den Wert in die Variable
VAR_IDENTNR_KOMPL = Me!Identnr_Kompl


'Schließe das Ufo
stDocName = "Schliessen_frm_Suche_Komplettwerkzeug"
DoCmd.RunMacro stDocName

'nur zur Prüfung ob Formular offen ist
If CurrentProject.AllForms("RÜSTPLAN").IsLoaded = True Then MsgBox
("OK")


'und hier sollte der Wert dann in das Ufo eingetragen werden
Forms![RÜSTPLAN].[Rüstplan_Unterformular].[Werkzeugnummer] VAR_IDENTNR_KOMPL


End Sub


Doch da kommt im Satz "Forms,,,," immer der Fehler:
"Laufzeit 438
Ojekt unterstützt diese Eigenschaft oder Methode nicht."

kann mir Laie Bitte jemand sagen, was ich da falsch gemacht habe?

Gruß Jürgen
 

Lesen sie die antworten

#1 Thomas Kühn
17/11/2009 - 09:45 | Warnen spam
Hallo Jürgen,


'und hier sollte der Wert dann in das Ufo eingetragen werden
Forms![RÜSTPLAN].[Rüstplan_Unterformular].[Werkzeugnummer] > VAR_IDENTNR_KOMPL




Hier fehlt ein Form:

Forms![RÜSTPLAN].Form![Rüstplan_Unterformular]![Werkzeugnummer]

Gruß Thomas



http://www.thomas-kuehn.de

Ähnliche fragen