Hallo und Guten Morgen zusammen,
wieder mal ein Anfängerproblem. Ich möchte 2 Parameter an ein Formular übergeben, dass dann nur diese anzeigt.
Bei meinem Messmittelprogramm steht nun bei mehreren [Modell] Messschieber [Benennung]150 mm eine Kalibrierung an. Ich möchte diese Messschieber nun Kalibrieren und öffne das Form Kalibrierung. Hier sollen nur alle Messschieber 150 mm angezeigt werden. Irgendwie komme ich mit den Beispielen aus den Foren nicht mit.
Hier der Code vom Auslöser:
If Me!sp1 = "Kalibrieren" Then
If Forms!Messmittel!abfuformsupport_Unterformular![nächste Kalibrierung] >= Date Then
MsgBox ("Messmittel muss nicht kalibriert werden")
Else
stDocName = "Kalibrierplanung"
stLinkCriteria = "[Modell]=" & "Forms!Messmittel!abfuformsupport_Unterformular![Modell]"
DoCmd.OpenForm stDocName, , , stLinkCriteria
End If
End If
Wie bekomme ich nun die Werte Modell und Benennung in das neu Formular Kalibrierplanung und bekomme nur dies dort angezeigt. Alles was ich bis jetzt unternommen hatte ist gescheitert, da das Uform nie gefunden wurde.
Kann mir da jemand helfen?
Hi,
ist der Inhalt von Modell ein Textfeld oder Zahlenfeld (Fremdschlüssel)?
Ist gewährleistet, dass beide Felder immer gefüllt sind?
wenn Textfeld: Was passiert mit?
stLinkCriteria = "[Modell]= '" & nz(Forms!Messmittel!abfuformsupport_Unterformular![Modell], "") & "' and Benennung = '" & nz(Forms!Messmittel!abfuformsupport_Unterformular![Benennung], "") & "'"
Harald
Hallo,
ich befürchte, das liegt Einiges im Argen mit der Tabellen- und Datenkonstuktion....
Wenn Du Dir zukünftige Arbeit erleichtern, bzw. gar nicht aufhalsen willst, dann konstruiere das Grundgerüst der Tabellen ( und ihren Beziehungen) entspr. den Normalisierungsregeln (Atomisierung, Beziehungen, Primärschlüssel, etc..., sieh auch u. st. Links in meiner Sign. zum Thema) nochmal neu....
So jedenfalls (nach diesem oberflächlichen Einblick in die Datenstruktur) ist die DB nicht zu gebrauchen.
Z. B. Ein "Modell" kann kein "Messschieber" sein, allenfalls steht da die Modellbezeichnung des Herstellers drin, wie auch eine Benennung "150 mm" Unsinn ist.
Messschieber: Geräteart
150: Messbereich
mm: Einheit
Hallo,
es sind Textfelder die übergeben werden.
in dem Code ist ein Fehler versteckt:
stLinkCriteria = "[Modell]= '" & nz(Forms!Messmittel!abfuformsupport_Unterformular![Modell], '') & "' and Benennung = '" & nz(Forms!Messmittel!abfuformsupport_Unterformular![Benennung], '') & "'"
Hier wird der Fehler angezeigt:
stLinkCriteria = "[Modell]= '" & nz(Forms!Messmittel!abfuformsupport_Unterformular![Modell], '') & "' and Benennung = '" & nz(Forms!Messmittel!abfuformsupport_Unterformular![Benennung], '') & "'" <-
Hallo
Wenn das Feld im Ufo nicht gefunden wird, sowird das Feld nicht richtig Angesprochen, schau mal unter dem Link ob das dein Problem löst.
Zitathttp://www.donkarl.com/FAQ4.2Zitat
Was @DF6GL dir Empfolen hat sollte aber weiter deine Beachtung finden.
@Stapi
das Ufo funktioniert ja bei einem Parameter.
PS: der Link funktioniert nicht mehr.
Mein Problem mit der DB ist, dass die Daten aus einer Excel Anwendung stammen. Ab dem Punkt die Daten zu sammeln beginnt meine Datenbankstruktur. Ich nutze die Tabelle aus Excel nur zur Datenfindung.
@bahasu,
ich habe einen Fehler gemacht. Dein Code funktioniert.
Danke für die schnelle Hilfe. Jetzt geht es in den Kalibrierplan.