25-12-17, 10:55
|
 | Όνομα: ΝΑΣΟΣ Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2016 Γλώσσα λογισμικού Office: Ελληνική | | Εγγραφή: 14-10-2010
Μηνύματα: 430
| |
Καλημέρα και χρόνια πολλά σε όλους.
Γρηγόρη μπορείς να κάνεις και τα παρακάτω: Κώδικας: Private Sub Form_BeforeUpdate(Cancel As Integer)
Me.LastUpdate = Now()
End Sub
ή Κώδικας: Private Sub Field1_Change()
Me.LastUpdate = Now()
End Sub
Private Sub Field2_Change()
Me.LastUpdate = Now()
End Sub
Private Sub Field3_Change()
Me.LastUpdate = Now()
End Sub
Private Sub Field4_Change()
Me.LastUpdate = Now()
End Sub
__________________
Φιλικά, Νάσος
|