[kapetang]

Καλησπέρα

Φαίη, καλωσόρισες στην παρέα του φόρουμ.

Αυτό που ζητάς, με συνάρτηση, δε γίνεται.

Σε πεδίο που υπάρχει τύπος η access δεν επιτρέπει να πληκτρολογούμε και δεδομένα.

Μπορείς να προσομοιώσεις το ζητούμενο προσθέτοντας στη φόρμα τον παρακάτω κώδικα.

Option Compare Database
Option Explicit

Private Sub Form_Current()
    If Me.NewRecord Then
        Me.Ποσό_εγγύησης_1.Locked = False
    Else
        If Me.Επιστράφηκε Then
            Me.Ποσό_εγγύησης_1.Locked = True
        Else
            Me.Ποσό_εγγύησης_1.Locked = False
        End If
    End If
End Sub

Private Sub Επιστράφηκε_AfterUpdate()
    If Me.Επιστράφηκε Then
        Me.Ποσό_εγγύησης_1 = 0
        Me.Ποσό_εγγύησης_1.Locked = True
    Else
        Me.Ποσό_εγγύησης_1.Locked = False
    End If
End Sub

Κάνε δοκιμές και ενημέρωσε το φόρουμ, αν καλύφτηκες

Φιλικά/Γιώργος