[kapetang]

Καλημέρα

Αντώνη αν θέλεις να εκτελείται ο κώδικας μόνο την πρώτη φορά που θα κλείσουμε τη φόρμα και να μη εκτελείται στα άλλα ανοιγοκλεισίματα, δοκίμασε το εξής:

1) Σε μία μονάδα κώδικα (Module) πρόσθεσε τη δήλωση:

Public blnExit As Boolean

2) Στον κώδικα που ανέβασες και μετά τη δήλωση Dim intCount As Integer πρόσθεσε τον παρακάτω κώδικα:

If blnExit exit sub
blnExit =true

Φιλικά/Γιώργος