Κουμπί για το χρωματισμό ορισμένων αριθμών στο φύλλο Excel

Θέμα

Ψάχνω για έναν τρόπο να κάνω ένα χρώμα κουμπιού όλοι οι αριθμοί ίσοι με τον αριθμό στο κουμπί ... για παράδειγμα, ας πούμε ότι έχω μια σειρά κουμπιών από το 1 έως το 10, και στα ίδια φύλλα με αριθμούς από 1 έως 10 σε καμία σειρά. Τώρα θέλω γρήγορα να μπορώ να εντοπίσω όλα τα 3 και τα 7 ανά χρώμα. "Απλό: κάντε κλικ στο κουμπί 3, δράση: χρωματίστε όλα τα κελιά με τον αριθμό 3 σε αυτό και αφήστε το να είναι έτσι μέχρι να πατήσω ξανά το κουμπί ...

Λύση

Θα δώσω μια άλλη λύση να εκτυπώσετε αυτές τις οδηγίες και να ακολουθήσετε (υπό την προϋπόθεση ότι σας ταιριάζει)

ΑΝΟΙΞΤΕ ΝΕΟ ΑΡΧΕΙΟ EXCEL

τώρα στον επεξεργαστή vb αντιγράψτε αυτήν τη μακροεντολή

 Sub test () Dim x ως ακέραιο, cfind () ως εύρος, j ως ακέραιο, k ως ακέραιο, να προσθέσετε ως στήλες συμβολοσειρών ("A: A"). j = WorkheetFunction.CountIf (Στήλες ("A: A"), x) Εάν j = 0 Στη συνέχεια MsgBox δεν υπάρχει τέτοια τιμή στη στήλη A "Exit Sub End Αν ReDim cfind Ορίστε cfind (k) = Στήλες ("A: A"). (k) = Στήλες ("A: A") .CfindNext (cfind (k)) Αν cfind (k) .ColorIndex = 3 βρόχος Επόμενο k End Sub

κάντε κλικ στο μενού προβολής - στη γραμμή εργαλείων

στον κατάλογο των γραμμών εργαλείων φόρμας υπάρχει ένας που ονομάζεται κλώστης

κάντε κλικ σε αυτό και σχεδιάστε ένα κουμπί περιστροφής

κάντε δεξί κλικ στο κουμπί και κάντε κλικ στο κουμπί "έλεγχος μορφοποίησης"

σε αυτό το παράθυρο επιλέξτε τον έλεγχο (το τελευταίο στοιχείο στην πάνω σειρά)

τύπου 1 έναντι "ελάχιστης τιμής"

τύπου 10 έναντι "μέγιστης τιμής"

η "βαθμιαία αλλαγή" θα είναι 1

link θα είναι $ F $ 1

κάντε κλικ στο ok

κάντε δεξί κλικ στο κουμπί περιστροφής και κάντε κλικ στο κουμπί "αντιστοιχίσετε μακροεντολή" θα εμφανιστεί το όνομα "test". επισημάνετε ότι και κάντε κλικ στο OK υποθέστε ότι οι αριθμοί είναι στη στήλη Α για να δοκιμάσετε τον τύπο μερικούς ακέραιους μεταξύ 1 και 10 (μερικές επαναλαμβανόμενες δύο φορές ή τρεις φορές, μερικοί αριθμοί λείπουν) από A1 έως A20 αποθηκεύστε το αρχείο τώρα επιλέξτε οποιοδήποτε κελί εκτός του κουμπιού περιστρεφόμενου ή βέλος προς τα κάτω στο κουμπί περιστροφής. Δείτε την τιμή στο F1. εάν το F1 είναι 1 δεν θα συμβεί τίποτα εάν κάνετε κλικ στο βέλος κάτω αντίστοιχα εάν το F1 είναι 10 προς τα πάνω το βέλος δεν θα δώσει τίποτα άλλο να πάει κάνοντας κλικ στα βέλη προς τα κάτω ή προς τα πάνω, να παρακολουθήσετε το F1 και να δείτε αυτούς τους αριθμούς (των οποίων η τιμή είναι η τιμή F1) Το Α θα επισημανθεί με κόκκινο χρώμα. Θα το χρησιμοποιήσετε για εσάς. Μπορείτε να τροποποιήσετε το σχέδιο