Me.Caption = Forms![Περιοχή ημερομηνιών έκθεσης].OpenArgs

[vasia_gou]

Καλησπέρα,

Μέσα στο OFFICE 2003 υπάρχει ένα πρότυπο που λέγεται Κταχώρηση παραγγελιών. Υπάρχει μία φόρμα Περιοχή ημερομηνιών έκθεσης η οποία δεν ανοίγει. Βγάζει το μήνυμα
Private Sub Form_Open(Cancel As Integer)
Me.Caption = Forms![Περιοχή ημερομηνιών έκθεσης].OpenArgs
End Sub
Τι λάθος υπάρχει????

[kapetang]

Βάσια ,καλώς ήρθες στην παρέα

Όταν ανοίγεις τη φόρμα στην οποία προκαλείται το λάθος, ο κώδικας προσπαθεί να ορίσει την ετικέτα της (Caption) στην τιμή Forms![Περιοχή ημερομηνιών έκθεσης].OpenArgs, που δεν πρέπει να είναι null.
Για να μη προκληθεί λάθος η φόρμα [Περιοχή ημερομηνιών έκθεσης] πρέπει να είναι ανοιχτή και μάλιστα να έχει ανοίξει με κώδικα (πχ πάτημα κουμπιού άλλης φόρμας) και να έχει δοθεί τιμή στο όρισμα OpenArgs.
Αν ανοίξεις τις φόρμες με τα κουμπιά που υπάρχουν στις φόρμες του πρότυπου πιστεύω ότι θα ανοίξουν κανονικά.
Στην ανάγκη άλλαξε τον κώδικα ως εξής:

Private Sub Form_Open(Cancel As Integer)
    On Error Resume Next
    Me.Caption = Forms![Περιοχή ημερομηνιών έκθεσης].OpenArgs
    On Error GoTo 0
End Sub

Καλό βράδυ
Γιώργος

[vasia_gou]

Γιώργο καλησπέρα,

Σε ευχαριστώ για την απάντησή σου. Δεν μου βγαίνει πλέον αυτό το μήνυμα αλλά όταν παράω Προεπισκόπιση δεν μου κάνει τίποτα. Μπορείς να με βοηθήσεις???

Ευχαριστώ!!

[vasia_gou]

Όλα ΟΚ.. Έπρεπε να πατήσω 2 φορές το κουμπί τηςΠροεπισκόπισης!!!!!!

Σε ευχαριστώ πάρα πολύ για την βοήθεια!!!!!

Να είσαι καλά!!!

[kapetang]

Βάσια, να είσαι και συ καλά!
Τώρα για το πάτημα του κουμπιού «Προεπισκόπηση» δύο φορές φαίνεται ότι ο κώδικας μπήκε στο συμβάν «Με το διπλό κλικ» αντί στο συμβάν «Με το κλικ».
Αν δεις τις ιδιότητες του κουμπιού (σε προβολή σχεδίασης), στην καρτέλα συμβάν, μπορείς να το καταλάβεις και να το διορθώσεις.
Καλό βράδυ.

Γιώργος