Eve: gleichen Wert mehreren Datensätzen zuweisen

Beitrag lesen

Mein Problem ist jetzt, dass ich den Status nicht im 1.Formular angezeigt bekomme, da wenn ich es mit einer Wenn-Funktion in VB löse und mit globalen Variablen füllt es alle xxxx mit dem gleichen Wert aus.

Das ist nicht wirklich verständlich. Du müßtest deinen VB-Code eventuell angeben. Aber grundsätzlich läßt sich annehmen, daß du den Wert, auf den es dir ankommt (Status) aus dem einen Datensatz ausliest, in eine Variable packst und diese Variable dann eben an den anderen Datensatz übergibst.

Form_Schicht2Status
Private Sub Form_Load()

Dim PNNrStatus As Double
Dim WochentagStatus As String
Dim DatumStatus As Date
Dim StatusStatus2 As Double //da 1 für 1 für Anwesend; 2 für G für Gleitzeit;...

PNNrStatus = Me.PNNrStatus
WochentagStatus = Me.WochentagStatus
DatumStatus = Me.DatumStatus
StatusStatus2 = Me.StatutsStatus2

End Sub

Form_Schicht2
Private Sub Form_Load()

Dim PNNr2 As Double
Dim Datum1 As Date

Dim Status1 As Double

If ((PNNrStatus And DatumStatus) = (PNNr And Datum1)) Then
Me.Status1 = StatusStatus2
Else
Me.Status1 = ""
End If
End Sub

Im letzten Datensatz steht nichts drin, weil das der ist zum einen neuen Datensatz hinzu zufügen. Deshalb ist sein ergebniss in allen Datensätzen 0. Ist das ist ja nicht das was ich will.

Der Status soll nach der Reihe abgefragt werden und die Datensätze geschrieben werden wo das Kriterium passt.

Grüße