![]() |
Κλείσιμο αναδυόμενης φόρμας όταν κλείνει η κύρια φόρμα 1 Συνημμένο(α) Καλησπέρα, Έχω π.χ. φόρμα Πελάτες και φόρμα Προιόντα. Ανοίγοντας την φόρμα Προιόντα μέσα από τη φόρμα Πελάτες, θέλω να συγχρονίσω τις φόρμες ώστε όταν κλείνει η φόρμα Πελάτες να κλείνει και η φόρμα Προιόντα. Μπορείτε να μου πείτε τι κάνω λάθος στον κώδικα? Private Sub Form_Close() 'Κλείνει την αναδυόμενη φόρμα Προιόντα εαν είναι ανοικτή If IsOpen("Προιόντα") Then DoCmd.Close acForm, "Προιόντα" End If End Sub Σας ευχαριστώ |
Καλησπέρα Αθανασία, στον κώδικα χρησιμοποιείς τη συνάρτηση χρήστη isOpen, χωρίς να την ορίσεις. Έτσι, όταν ο κώδικας την καλεί (προσπαθεί να την εκτελέσει), δεν είναι δυνατόν να εντοπιστεί και προκαλείται λάθος. Μπορείς να υλοποιήσεις το ζητούμενο με τον παρακάτω απλούστερο κώδικα: Κώδικας: Private Sub Form_Close()CurrentProject.AllForms("Προιόντα").IsLoad ed Γιώργος |
Σε ευχαριστώ πολύ που ασχολήθηκες αλλά με τη λύση που μου δίνεις δεν κλείνει η αναδυόμενη φόρμα Προιόντα όταν κλείνει η κύρια φόρμα Πελάτες. Μάλλον δεν το έδωσα να το καταλάβεις |
1 Συνημμένο(α) Στο συνημμένο αρχείο, όταν κλείνει η φόρμα [Πελάτες] κλείνει και η φόρμα [Προιόντα], αν είναι ανοιχτή. Όταν ανοίξεις το αρχείο και παρουσιάσει μήνυμα ασφάλειας ενεργοποίησε τις μακροεντολές. |
Πόσα ευχαριστώ να πώ δεν ξέρω. Να είστε καλά |
| Η ώρα είναι 03:20. |
Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.