Office: (Office 2007) Problem beim Schliessen eines Formulares

Doch doch es heisst so. *Smilie

Jetzt ist mir doch glatt aufgefallen, das das Feld "ID_F" gar nicht im Unterformular eingesetzt war. *hmpf*

Hab dies gleich nachgeholt und siehe da es steht zumindest ein Wert da, ALLERDINGS ist es immer die gleiche, erste ID die da aus dem Hauptdatensatz geholt wird. Was ist denn da nu wieder los. *seufz*


Zusätzlich hab ich mal wiedermal mein bekanntes Syntax-Problem beim Ansprechen meiner Formulare. *frown.gif*
Beim Schliessen von "ufoAenderungen_2a" soll "ufoAenderungen_2" aktualisiert werden, was aber mal wieder wegen dem Laufzeitfehler "2450": MS Access kann das Formular "Stammdaten" nicht finden, auf das verwiesen wird. nicht klappen will.

Würdest Du mir da bitte noch mal aus der Patsche helfen liebe Maike ?

Private Sub Befehl26_Click()
DoCmd.RunCommand acCmdSaveRecord
Forms!Stammdaten!frm_Aenderungen_2.Form.Requery
DoCmd.Close
End Sub

 

Ja, welche soll es denn sonst sein? Du musst doch wissen, welcher Schlüssel dort eingetragen werden muss/soll. Den musst du dann halt übergeben.

Ich denk, dein Hauptformular heißt Formular1?
Es geht immer der Reihe nach:
Code:

also vermutlich
Code:

maike

 

Maike ... ich hab den Wald vor lauter Bäumen nicht gesehen. *grins

Es musste natürlich so heissen:

Private Sub Befehl26_Click()
DoCmd.RunCommand acCmdSaveRecord
Forms!Formular1!Stammdaten!ufo_Aenderungen2.Form.Requery
DoCmd.Close
End Sub

Schon doof etwas zu sehen was gar nicht da ist. *grins
Aber es funktioniert jetzt, vielen lieben Dank dafür. *Smilie

 

Aber eine bescheidene Frage habe ich noch.

Und zwar, im aufgerufenen "ufm_Anderungen2a" soll man nur EINEN EINZIGEN neuen Eintrag vornehmen können. Es soll also auch NICHT möglich sein mit der TAB-Taste auf den nächsten neuen Datensatz zu springen.

Wie also kann man so etwas umsetzen ?

 

Ich habe es nun selbst lösen können, indem ich in den Formulareigenschaften den Zyklus auf "aktuellen Datensatz" gesetzt habe.

 

Einen kleinen Verbesserungsvorschlag noch:
Code:

Dem Button würde ich auch noch einen "sprechenden" Namen verpassen, btnSchliessen z.B.
maike

 

Hallo Maike,

Naja, ich bin ja ein bisschen aus der Übung, und da war ich mir
1. nicht sicher, ob Access da die Typen automatisch wandelt;
2. wollte ich den TS darauf hinweisen, dass OpenArgs eben ein String ist, und
3. hatte ich irgendwie im Kopf, dass ich mit Str(Zahl) irgendwie immer Probleme hatte, die bei Format(Zahl) nicht auftraten.
gruss ekkehard


P.S. Erinnere mich bloss an Montag ;-)

 

\@Ekkehard:
Wie hättest du denn die Erinnerung gern, täglich *mrcool ?
maike

 

Hallo,

... und ohne Fehlerbehandlung kann es (nicht nur) bei Me.Dirty = False auch schon mal krachen.

 

Hallo Ihr Lieben, danke für Eure Ergänzungen.

Ich habe aber noch mal eine Frage.
Und zwar werden in dem Historien-Eingabeformular automatisch via Formeln zwei Werte ermittelt/angezeigt, damit man sich spart diese eingeben zu müssen.

Aenderungs-ID =DomMax("Historie_Version_Nr","tbl_Historie","ID_F=" & [Formulare]![Formular1]![Stammdaten]![ID])+1

Verantwortlicher =[Formulare]![frm_start]![Kombinationsfeld20].[Column](2)

Mein Problem besteht jetzt lediglich darin, dass beim Speichern der rot markierte Wert nicht in die Tabelle geschrieben werden, sondern leer bleibt.

Es erscheint:
Laufzeitfehler 2448: Sie können diesem Objekt keinen Wert zuweisen.

Die Datensatzquelle des Historien-Eingabeformulars lautet übrigens:
SELECT tbl_Historie.ID, tbl_Historie.ID_F, tbl_Historie.Historie_Version_Nr, tbl_Historie.Historie_Datum, tbl_Historie.Historie_Verantwortlich, tbl_Historie.Historie_Text FROM tbl_Historie;

 

Wieso machst du denn diese Zuweisung im Form_AfterUpdate?
Das gehört ins Form_Load oder Form_Current.
maike

 

Hallo Maike,

ich dachte es wär sinnvoll, wenn der/die Wert(e) erst gespeichert werden NACHDEM der komplette Datensatz gefüllt wurde. Ich habe nämlich noch ein Feld welches manuell gefüllt werden muss.

Bzw. könnte man nicht auch die beiden Codezeilen beim Drückes des "Speicher-Buttons" integrieren ?

Aber das eigentliche Problem ist doch bestimmt wieder an meiner Syntax ?
Andererseits hatte ich auch erst gelesen das man keine durch einen AUSDRUCK ermittelten Werte speichern kann ... oder ?

 

So nun hab ich wohl die korrekte Syntax gefunden ... es lag wohl an den eckigen Klammern. *hmpf*
ABER zu früh gefreut, es erscheint zwar nun keine Fehlermeldung mehr, ABER dafür bleiben die Felder in der Tabelle leer.


Private Sub Form_AfterUpdate()
Me![Historie_Version_Nr] = Me.[Aenderungs-ID]
Me![Historie_Verantwortlich] = Forms!frm_start.Kombinationsfeld20.Column(2)
End Sub


Hier noch mal der Code meines Buttons der das Formular schliesst und die Angaben in der Tabelle speichern soll:

Code:

 

Form AfterUpdate ist das Ereignis, das nach dem Speichern eintritt.
(Die Beliebtheit von "Speicher-Buttons" wird mir auf ewig ein Rätsel bleiben *wink.gif* .)
Code:

maike

 

und wieder kommt nun ein Laufzeitfehler: -2147352567 (800200009) *frown.gif*

"Sie können diesem Objekt keinen Wert zuweisen"

Me.Historie_Verantwortlich = Forms!frm_start!Kombinationsfeld20.Column(2)