Εμφάνιση ενός μόνο μηνύματος
  #1  
Παλιά 04-07-13, 15:31
Χρήστος Ο χρήστης Χρήστος δεν είναι συνδεδεμένος
Όνομα: Χρήστος Φ.
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-12-2010
Περιοχή: Θεσσαλονίκη
Μηνύματα: 498
Προεπιλογή Μετάβαση από μια φόρμα σε άλλη

Γεια σας...
Ζητώ την βοήθειά σας στο εξής:
Έχω 2 φόρμες frm1 και frm2

Απο' την frm1 πηγαίνω στην frm2:
(κουμπί στην frm1)
DoCmd.OpenForm "frm2", , , "[ID]=" & [ID] (κοινόπεδίο ---> ID ---> Αριθμός)
και η frm1 κλείνει.


Απ' την frm2 θέλω να ανοίξει η frm1, με όλες τις εγγραφές και να επιλεχθεί αυτή με το συγκεκριμένο ID (Όχι να φιλτραριστεί!)
Τι διορθώσεις πρέπει να κάνω στον παρακάτω κώδικα;

(κουμπί στην frm2)
Dim RecID As Long
RecID = Nz(Me.ID)
With Me.Recordset.Clone
DoCmd.OpenForm "frm1"
.FindFirst "[ID]=" & RecID
If Not .NoMatch Then Me.Bookmark = .Bookmark
End With
DoCmd.Close acForm, "frm2"