Worksheet_Change Event
Μπορεί να θέλετε να εκτελέσετε μια μακροεντολή όταν αλλάζει ένα κελί. Μια δημοφιλής χρήση αυτής της δυνατότητας είναι να επικυρώσει ένας προσαρμοσμένος κώδικας ένα κελί μετά από μια αλλαγή. Είναι εύκολο να το κάνετε αυτό χρησιμοποιώντας το συμβάν αλλαγής αντικειμένων φύλλου εργασίας.
Στο Visual Basic Editor πρέπει πρώτα να κάνετε διπλό κλικ στο όνομα του φύλλου όπου αλλάζει το κελί που ενεργοποιεί τη μακροεντολή. Αυτό ανοίγει το παράθυρο κώδικα για αυτό το αντικείμενο φύλλου. Σε αυτήν την περίπτωση ήθελα να εκτελέσω μια μακροεντολή όταν αλλάζει ένα κελί στο Sheet1.
Αφού ανοίξετε το παράθυρο κωδικού για το φύλλο εργασίας, τοποθετείτε τον κωδικό σας στο συμβάν Worksheet_Change. Το ακόλουθο παράδειγμα θα εμφανίσει ένα πλαίσιο μηνυμάτων εάν αλλάξουν τα περιεχόμενα του κελιού Α1. Πρώτα η υπορουτίνα πυροδοτεί αν όποιος αλλάζει το κελί, στη συνέχεια η χρήση ενός IF … Τότε η εντολή θα εκτελέσει τον κώδικα μόνο εάν το κελί A1 ήταν το κελί που άλλαξε με βάση το If … Τότε.
Private Sub Worksheet_Change (ByVal Target As Range) If Target.Address = "$ A $ 1" Τότε MsgBox "Αυτός ο κώδικας λειτουργεί όταν αλλάζει το κελί A1!" Τέλος Αν Τέλος Υπο
Μπορείτε να τοποθετήσετε τον κωδικό σας απευθείας στην υπορουτίνα Worksheet_Change ή να καλέσετε άλλη μακροεντολή από εκεί.
