Office: (Office 2010) Wert aus ufrm in frm

Hallo,

ich will bei einer älteren DB etwas ändern, komme aber einfach nicht weiter mit dem Zugriff auf das Unterformular. Leider sind die Namen der tbl, qry, frm, ufrm und rep mit einem oder zwei Bindestrichen (-) versehen. Ein Ändern wäre ein sehr großer Aufwand.
Recherchen haben mich nicht wirklich zum Ziel geführt.

frm = frm-RE-Übersicht
ufrm = ufrm-RE-Übersicht

im frm ist ein ungebundenes Textfeld "txtSumNetto", welches mit der Summe aus dem ufrm "txtNettoges" gefüllt werden soll. Beide Felder haben das Format "Euro".

txtSumNetto = Forms![frm-RE-Übersicht]![ufrm-RE-Übersicht].Form![txtNettoges]

Leider bekomme ich folgende Fehlermeldung

Laufzeitfehler
Sie haben einen Wert eingegeben, der für dieses Feld nicht gültig ist.


Hat jemand einen Lösungsvorschlag ?


Alternativ;
würde ich auch aus dem Hauptformular über den Recordset auf die Abfrage des Unterformulars zugreifen und die Gesamtsumme neu ermitteln lassen, da bräuchte ich aber auch Hilfe in Bezug auf das Ansprechen der Abfrage des Unterformulars. Me.Recordset geht da ja nicht.

Auf die eigene Datenherkunft zuzugreifen geht ja so;

Dim rst As DAO.Recordset
Dim MeineSumme

Set rst = Me.RecordsetClone
If rst.EOF And rst.BOF Then
MeineSumme = 0
Else
With rst
.MoveFirst
Do While Not .EOF
MeineSumme = MeineSumme + ![ATnetto]
.MoveNext
Loop
End With
End If

:)

 

=[ufrm-RE-Übersicht]!Form![txtNettoges] sollte als Steuerelementinhalt genügen.

PS: die Verwendung von Sonder- und Leerzeichen in Objektnamen machen eine Access-Datenbank besonders pflegeleicht. *grins

 

Hallo Nouba,
danke für die schnelle Antwort.
Leider bekomme ich da im Steuerelement des Hauptformulars nur #Name? angezeigt.



P.S. Das ist eine DB aus meinen Anfängen und sie hat bis jetzt auch toll funktioniert. Da sie sehr komplex ist und über viel VBA verfügt ist eine "Modifizierung" leider sehr aufwendig und kann zu Fehlern führen. Da die DB aber zur Auftragsbearbeitung verwendet wird möchte ich auf das Risiko gerne verzichten.
Inzwischen verzichte ich ebenfalls vollständig auf Sonderzeichen etc.

 

Dann wird das Unterformularsteuerelement oder das Steuerelement im Formular des Unterformularsteuerelements oder beides einen anderen Namen haben.

 

(Per Drag Drop hierher kopiert)

Ufrm Steuerelement:
Name: ufrm-RE-Übersicht
Herkunftsobjekt: ufrm-RE-Übersicht

Textfeld um ufrm: txtNettoges


Müsste passen, sehe keinen Fehler

 

Hallo!

Laut Fehlermeldung gibt es doch auch kein Zugriffsproblem, oder?
Welcher Wert wird übergeben?

Zum Ausprobieren:
Code:

In welcher Zeile kommt es bei diesem Code zum Fehler?

mfg
Josef

 

Hallo,

da stimmt die Syntax nicht, es müsste heißen:
Code:

. anstelle von !

Wenn der Rest denn stimmt...

 

Habe Deinen Code mal aus einen Button im Hauptformular gelegt.
Bei Klicken kommen die richtigen Werte !!!!!!

Im Hauptformular habe ich Kombifelder mit denen Werte für die Kriterien der Abfrage gesetzt werden, aus welcher das Ufrm seine Daten bezieht.
Wenn ich den Code dort in das AfterUpdate packe, bleibt das Textfeld leer, bekmmt keine Werte.

Da ich nicht immer den Button drücken möchte, hab ich das AfterUpdate verwenden wollen.

 

. anstelle von !

Wenn der Rest denn stimmt...

Geht auch mit dieser Syntax nicht.
im textfeld steht weiterhin
#Name?

 

Uups, da hat Maggie wohl Recht.

 

Also wenn ich diese VBA Zeile per Button verwende, dann klappt es.

= Forms![frm-RE-Übersicht]![ufrm-RE-Übersicht].Form![txtNettoges]

Somit stimmen schon mal die Namen der Formulare und des Feldes mit dem zu übernehmenden Wert.

im Steuerelement geht mit dieser Zeile nichts.
=[ufrm-RE-Übersicht].Form![txtNettoges]

da gibts nur #Name? statt dem Wert

.......das gibts doch nicht !!!!

 

Habe den VBA Code nochmal in die AfterUpdate der Kombifelder gepackt.

Erfolg .... das Textfeld bleibt leer

Dann habe ich eine 3 Sekunden Zeitschleife vor den Code gehängt

Erfolg .... die Werte werden korrekt übergeben !!!!!

Es scheint also mit der Abfrage und der hier benötigten Zeit zusammenzuhängen, die gebraucht wird um dem UF die Datenbasis zu liefern.


Über die Steuerelemente direkt geht es auch weiterhin nicht !!!

 

Versuche mal an Stelle von
Code:

dies:
Code:

 

Hi,

wie wär's wenn du mal den umgekehrten Weg wählst und das Textfeld im HF aus dem UF heraus füllst, bspw. im ufrm-Ereignis "Beim Anzeigen".

@maxel:
Die englische Syntax ist eigentlich nie verkehrt, im Zweifelsfall wird sie von Access eingedeutscht.
Oder vielleicht hat er ja auch nur die engl. Sprachversion installiert...

 

Hallo,
ich würde auf das komplette Formularbezugsgedöns verzichten und die Summe per
Code:

direkt im Hafo ermitteln.
Im Kriterium ist auf das Schlüsselfeld zu verweisen, das ohnehin als Primärschlüssel auf dem Hafo (bzw. dessen Datenherkunft) vorhanden sein muss, wenn Hafo und Ufo verknüpft sind.