Formular aktuallisiert nicht immer
Hallo Leutz,
ich hab folgendes Problem:
Ich habe eine Datenbank angelegt, um von mehrern Gesellschaften die eingescannte Eingangspost zu dokumentieren. Also eine Tabelle und dort ersten beiden Spalten Gesellschaft und Belegart (Rechnung, Gutschrift etc)
Da ich nur ein Fomular nutzen wollte, habe ich eine Abfrage gebastelt, die filtert und ein Formular, welches sich auf diese Abfrage bezieht.
Der Code zum öffnen des Forms lautet wie folgt
Private Sub btm_tks_lieferscheine_Click()
On Error GoTo Err_btm_tks_lieferscheine_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Form1"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Belegart = btm_tks_lieferscheine.Caption
Gesellschaft = Form_start.Auswahl_ges.Value
Form_start.auswahl_bel.Value = Belegart
Form_Form1.Gesellschaft.DefaultValue = "'" & Gesellschaft & "'"
Form_Form1.Belegart.DefaultValue = "'" & Belegart & "'"
DoCmd.GoToRecord , , acNewRec
Exit_btm_tks_lieferscheine_Click:
Exit Sub
Err_btm_tks_lieferscheine_Click:
MsgBox Err.Description
Resume Exit_btm_tks_lieferscheine_Click
End Sub
Problem ist nun, dass teilweise nach dem öffnen noch die alten Datensätze angezeigt werden. Hatte ih also eben Rechnungen offen und klicke nun auf Lieferscheine, so stehen die Rechnungen noch drin, aber der neue Datensatz hat die Defaulwerte scho von den Lieferscheinen. Öffne ich das Form nochmal, ist es richtig!!
Dies ist aber nicht immer, sondern beim 3 oder 4 mal nur.
Wer weiss Rat?
ich hab folgendes Problem:
Ich habe eine Datenbank angelegt, um von mehrern Gesellschaften die eingescannte Eingangspost zu dokumentieren. Also eine Tabelle und dort ersten beiden Spalten Gesellschaft und Belegart (Rechnung, Gutschrift etc)
Da ich nur ein Fomular nutzen wollte, habe ich eine Abfrage gebastelt, die filtert und ein Formular, welches sich auf diese Abfrage bezieht.
Der Code zum öffnen des Forms lautet wie folgt
Private Sub btm_tks_lieferscheine_Click()
On Error GoTo Err_btm_tks_lieferscheine_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Form1"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Belegart = btm_tks_lieferscheine.Caption
Gesellschaft = Form_start.Auswahl_ges.Value
Form_start.auswahl_bel.Value = Belegart
Form_Form1.Gesellschaft.DefaultValue = "'" & Gesellschaft & "'"
Form_Form1.Belegart.DefaultValue = "'" & Belegart & "'"
DoCmd.GoToRecord , , acNewRec
Exit_btm_tks_lieferscheine_Click:
Exit Sub
Err_btm_tks_lieferscheine_Click:
MsgBox Err.Description
Resume Exit_btm_tks_lieferscheine_Click
End Sub
Problem ist nun, dass teilweise nach dem öffnen noch die alten Datensätze angezeigt werden. Hatte ih also eben Rechnungen offen und klicke nun auf Lieferscheine, so stehen die Rechnungen noch drin, aber der neue Datensatz hat die Defaulwerte scho von den Lieferscheinen. Öffne ich das Form nochmal, ist es richtig!!
Dies ist aber nicht immer, sondern beim 3 oder 4 mal nur.
Wer weiss Rat?
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 47122
Url: https://administrator.de/forum/formular-aktuallisiert-nicht-immer-47122.html
Ausgedruckt am: 05.04.2025 um 19:04 Uhr
1 Kommentar