Σε αυτό το άρθρο, θα χρησιμοποιήσουμε πριν από το διπλό κλικ συμβάντος του φύλλου εργασίας για να ελέγξουμε και να καταργήσουμε την επιλογή του κελιού.
Τα ακατέργαστα δεδομένα αποτελούνται από ορισμένα είδη τροφίμων. Θέλουμε να επισημάνουμε τα στοιχεία που έχουμε αγοράσει.
Με διπλό κλικ σε ένα κελί, θα προστεθεί σήμα επιλογής σε αυτό. Με τον ίδιο τρόπο, μπορεί να αφαιρεθεί κάνοντας διπλό κλικ επάνω του.
Επεξήγηση κώδικα
Αν Στόχος.Στήλη = 3 Τότε
Ο παραπάνω κώδικας χρησιμοποιείται για τον περιορισμό της εκτέλεσης συμβάντος διπλού κλικ μόνο όταν το κελί της 3ης στήλης έχει διπλό κλικ.
Ακύρωση = Αλήθεια
Ο παραπάνω κώδικας χρησιμοποιείται για να αποτρέψει ένα κελί να μπει σε λειτουργία επεξεργασίας.
Target.Font.Name = "Marlett"
Ο παραπάνω κώδικας χρησιμοποιείται για την εκχώρηση γραμματοσειράς Marlett στο κελί προορισμού.
Αν Στόχος = "" Τότε
Στόχος = "α"
Αλλού
Στόχος = ""
Τέλος εαν
Ο παραπάνω κώδικας χρησιμοποιείται για να εισαγάγετε ένα σημάδι τικ και να το αφαιρέσετε επίσης. Στη γραμματοσειρά Marlett "a" αντιπροσωπεύει το σημάδι τικ και το κενό χρησιμοποιείται για να αφαιρέσει το σημάδι.
Ακολουθήστε παρακάτω για τον κωδικό
Επιλογή ρητή Ιδιωτική Υποεργασία Font.Name = "Marlett" 'Έλεγχος εάν η τιμή του κελιού στόχου είναι κενή και εισαγάγετε το τικ. Εάν Target = "" Τότε Target = "a" Else Target = "" Τέλος Αν Τερματισμός Αν Τέλος Sub
Αν σας άρεσε αυτό το blog, μοιραστείτε το με τους φίλους σας στο Facebook. Επίσης, μπορείτε να μας ακολουθήσετε στο Twitter και το Facebook.
Θα θέλαμε πολύ να σας ακούσουμε, ενημερώστε μας πώς μπορούμε να βελτιώσουμε το έργο μας και να το κάνουμε καλύτερο για εσάς. Γράψτε μας στον ιστότοπο email