Hallo,
wie kann ich am besten vorgehen, wenn ich über ein Formular,
- Werte aus einer Vorgabe-Tabelle laden,
- im Formular ändern bzw. noch nicht vorhandene Werte ergänzen will,
- und diese dann in einer anderen Tabelle anfügen will?
Ich habe es bisher mit
Private Sub cmbType_AfterUpdate()
DoCmd.OpenQuery "qrySchraubertype"
DoCmd.Close
Forms!frmNeuSchrauber.Requery
DoCmd.GoToRecord , , acLast
End Sub
gemacht.
- Das Formular ist an die Tabelle gebunden, wo ich anfügen möchte.
- Wählen der Vorgabedaten geschiet über ein Formular mit Kombobox
- Anschließend Daten eingeben und speichern.
Nur wenn ich den Datensatz (vor dem Speichern) jetzt doch verwerfen will... muss ich den erst wieder löschen.
Hat jemand eine andere Idee?
Kann auch ganz anderes gelöst sein sein.
Was nicht geht ist die Vorgabe nur mit dem Datensatz zu verknüfen.
Gruß Dennis
Hallo,
Erstell ein ungebundenes Kombifeld mit Datensatzherkunft zur Vorlagentabelle und mit allen benötigten Feldern.
In der AfterUpdate-Ereignisprozedur weist Du die einzelnen Kombispaltenwerte der Standardwert-Eigenschaft der entspr. Formularfelder zu. Dabei auf die Datentypen achten.
Sub cmbKombi_Afterupdate()
Me!Feld1.Defaultvalue = Me!cmbKombi.Column(1) 'Datentyp Long
Me!Feld2.Defaultvalue = """" & Me!cmbKombi.Column(2) & """" 'Datentyp Text
Me!Feld3.Defaultvalue = Str(CDbl(Me!Column(3))) ' Datentyp Datum
End Sub
Ein Datensatz wird nur dann generiert, wenn in ein Feld ein Wert tatsächlich eingegeben wird.