
19-11-10, 10:43
|
 | Διαχειριστής Όνομα: Τάσος Φιλοξενιδης Έκδοση λογισμικού Office: Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική | | Εγγραφή: 21-10-2009
Μηνύματα: 2.035
| |
Καλημέρα Γιώργο!
Υποθέτω ότι ο πίνακας ή ερώτημα που πηγάζουν τα δεδομένα της φόρμα σου περιέχει αναγνωριστικό πεδίο με το όνομα "ID".
Στον κώδικα VBA του κουμπιού της ανανέωσης μπορείς να περάσεις το παρακάτω: Κώδικας: Private Sub cmdRefreshForm_Click()
Dim IdNumber As Long
IdNumber = Nz(Me.ID)
Me.Requery
If IdNumber <> 0 Then
With Me.Recordset
.FindFirst "[ID] = " & IdNumber
If Not .EOF Then Me.Bookmark = .Bookmark
End With
End If
End Sub
Για την ενεργοποίηση ή απενεργοποίηση προειδοποιήσεων ασφαλείας στη γραμμή μηνυμάτων
ρίξε μια ματιά στον παρακάτω σύνδεσμο: Ενεργοποίηση ή απενεργοποίηση προειδοποιήσεων ασφαλείας στη Γραμμή μηνυμάτων - Word - Microsoft Office
Καλή συνέχεια!
Φιλικά
Τάσος
__________________ Ms-Office Development Team Ανάπτυξη επαγγελματικών εφαρμογών |