Εμφάνιση ενός μόνο μηνύματος
  #5  
Παλιά 11-12-12, 09:40
kapetang Ο χρήστης kapetang δεν είναι συνδεδεμένος
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλημέρα

Κώστα, έχεις δίκιο.

Νομίζω ότι το πρόβλημα θα λυθεί, αν στην κύρια φόρμα προσθέσεις, στο συμβάν AfrerUpdate των πεδίων ΔΙΚΑΙΟΥΜΕΝΕΣ και ΥΠΟΛ_ΠΕΡΣΙΝΑ, τον παρακάτω κώδικα:

Κώδικας:
Private Sub ΔΙΚΑΙΟΥΜΕΝΕΣ_AfterUpdate()
    UdateYpoloipo
End Sub

Private Sub ΥΠΟΛ_ΠΕΡΣΙΝΑ_AfterUpdate()
    UdateYpoloipo
End Sub
και ακολούθως προσθέσεις και τη διαδικασία:

Κώδικας:
Public Sub UdateYpoloipo()
    Me.Κείμενο24.Requery
    Me.[ΥΠΟΛ ΗΜΕΡ 1/3] = Me.[Κείμενο24]
End Sub
Φιλικά/Γιώργος
Απάντηση με παράθεση