Ο Καρθίκ ρωτά:
Δουλεύω έναν κώδικα συμβάντος για την επισήμανση του ενεργού κελιού, βασικά δείχνουν την αλλαγή του χρώματος φόντου του ενεργού κελιού. Χρησιμοποίησα το συμβάν αλλαγής και αυτό αλλάζει την τιμή του ενεργού κελιού μόνο όταν η τιμή έχει αλλάξει.
Τι ωραία ερώτηση. Το κόλπο είναι να χρησιμοποιήσετε το συμβάν αλλαγής Worksheet_Selection αντί για το συμβάν Worksheet_Change. Αυτή η μακροεντολή ειδικού χειριστή συμβάντων πρέπει να εισαχθεί στο παράθυρο κώδικα που σχετίζεται με το συγκεκριμένο φύλλο εργασίας σας. Μια συζήτηση για το πώς να το βρείτε στο παράθυρο του έργου βρίσκεται σε αυτήν την αρχειοθετημένη συμβουλή.
Στη συνέχεια θα εισαγάγατε τον ακόλουθο κωδικό:
Public OldRng As Range Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not OldRng Is Nothing Then OldRng.Interior.ColorIndex = xlNone End If Target.Interior.ColorIndex = 6 Set OldRng = Target End SubΑυτό το πρόγραμμα χρησιμοποιεί μια δημόσια μεταβλητή που ονομάζεται OldRng για να θυμηθεί το τελευταίο εύρος που επιλέχθηκε έτσι ώστε το χρώμα να μπορεί να επαναφερθεί σε λευκό όταν επιλέγετε μια νέα περιοχή.
