[Tasos]

Αγαπητή Μαρία,

Η παρακάτω πρόταση μου προϋποθέτει:

• Ενα πεδίο με το όνομα ProductDescription
• Ενα πεδίο με το όνομα ProductPrice
• Ενα πεδίο με το όνομα IsSold (Ναι/Όχι)

Ο κώδικας στη φόρμα:

Option Compare Database
Option Explicit
Private Is_Sold%

Private Sub Form_Current()
    Is_Sold = Me.IsSold
    Me.ProductDescription.Locked = Is_Sold
    Me.ProductPrice.Locked = Is_Sold
End Sub

Private Sub IsSold_Click()
    Form_Current
End Sub

Θα μπορούσες επίσης, αντί για VBA (αν σε ικανοποιεί το οπτικό αποτέλεσμα) να εφαρμόσεις Μορφοποίηση υπό όρους στα πεδία που θέλεις να κλειδώσεις
χρησιμοποιώντας την Έκφραση "[IsSold]" (βλ. εικόνα).



Φιλικά

Τάσος