Εμφάνιση ενός μόνο μηνύματος
  #4  
Παλιά 01-12-17, 19:22
nasos23 Ο χρήστης nasos23 δεν είναι συνδεδεμένος
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 455
Προεπιλογή

Καλησπέρα σε όλους.
Σάκη η δική μου πρόταση
με τη φόρτωση της φόρμας.
Κώδικας:
Private Sub Form_Load()
If Not IsNull(Me.ΕΝΕΡΓΟΣ) Then
 Me.FilterOn = True
   End If
End Sub
μετά την ενημέρωση
Κώδικας:
Private Sub Form_AfterUpdate()
If Not IsNull(Me.ΕΝΕΡΓΟΣ) Then
 Me.FilterOn = True
   End If
Me.Refresh
End Sub

Τελευταία επεξεργασία από το χρήστη nasos23 : 02-12-17 στις 06:37.
Απάντηση με παράθεση