
23-11-20, 20:23
|
| Όνομα: Γιάννης Έκδοση λογισμικού Office: Ms-Office 2010 Γλώσσα λογισμικού Office: Ελληνική | | Εγγραφή: 29-04-2018
Μηνύματα: 50
| |
Καλησπέρα σε όλη τη παρέα
Νάσο ευχαριστώ που ασχολήθηκες
Δυστυχώς δεν υπολογίζει την τιμή της εγγραφής που καταχωρώ εκείνη τι στιγμή
αλλά την προηγούμενη (τελευταία) εγγραφή ανά πελάτη
Αν δημιουργούσε νέα εγγραφή για να υπολογίσει εκεί το υπόλοιπο θα δούλευε ???
Χρησιμοποίησα αυτό που έγραψες "Μετά από εισαγωγή" στη φόρμα και δούλεψε
Είναι σωστός αυτός ο τρόπος ???
Private Sub Form_AfterInsert()
If Me.Xreosi <> 0 Then
Me.Ipolipo = Nz(DSum("Xreosi", "pPelatesKinisi", "[a/aPelati]=" & Me.[a/aPelati] & "") - DSum("Elava", "pPelatesKinisi", "[a/aPelati]=" & Me.[a/aPelati] & ""), 0)
End If
If Me.Elava <> 0 Then
Me.Ipolipo = Nz(DSum("Xreosi", "pPelatesKinisi", "[a/aPelati]=" & Me.[a/aPelati] & "") - DSum("Elava", "pPelatesKinisi", "[a/aPelati]=" & Me.[a/aPelati] & ""), 0)
End If
End Sub
|