Πώς να ορίσετε ένα χρώμα κελιού Excel σύμφωνα με μια συνθήκη με το VBA;

Τελευταία ενημέρωση: Οκτώβριος 2023; Microsoft Excel 365, 2022, 2019, 2016.

Στο σημερινό σεμινάριο VBA for Excel Automation θα μάθουμε πώς να αλλάξουμε μέσω προγραμματισμού το χρώμα ενός κελιού με βάση την τιμή του κελιού. Αυτή η τεχνική είναι χρήσιμη κατά την ανάπτυξη ενός απλού πίνακα ελέγχου κατάστασης.

Ρύθμιση

Αν δεν έχετε ασχοληθεί ακόμη με την ανάπτυξη στο Excel, σας προτείνουμε να ανατρέξετε στον εισαγωγικό μας οδηγό για τις μακροεντολές Excel. Ορίστε τα βήματα που πρέπει να ακολουθήσετε:

  1. Ανοίξτε το Microsoft Excel (ο κώδικας αναμένεται να λειτουργεί από το Excel 2007 και μετά).
  2. Σε ένα κενό φύλλο εργασίας, προσθέστε τον ακόλουθο πίνακα:

Πώς να ρυθμίσετε το χρώμα κελιού Excel με VBA

  1. Ορίστε ένα εύρος με όνομα πατώντας: Τύποι >> Ορισμός ονόματος

Ορισμός ονόματος εύρους στο Excel

  1. Πατήστε ΟΚ.

Αλλαγή χρώματος με βάση την τιμή

Ακολουθήστε τα παρακάτω βήματα για να αλλάξετε το χρώμα του εσωτερικού κελιού:

  1. Κάντε κλικ στην καρτέλα Προγραμματιστής στην κορδέλα.
  2. Πατήστε Visual Basic ή Alt+F11 για να ανοίξετε το πρόγραμμα επεξεργασίας VBA.
  3. Επιλέξτε το φύλλο εργασίας στο οποίο θέλετε να εκτελέσετε τον κώδικά σας.
  4. Επικολλήστε τον παρακάτω κώδικα για να τροποποιήσετε το χρώμα των κελιών με βάση τις συγκεκριμένες τιμές RGB:
Sub Color_Cell_Condition()
        Dim MyCell As Range
        Dim StatValue As String
        Dim StatusRange As Range
        
        Set StatusRange = Range("Status")
        
        For Each MyCell In StatusRange
            StatValue = MyCell.Value
            
            Select Case StatValue
                Case "Progressing"
                    MyCell.Interior.Color = RGB(0, 255, 0)
                Case "Pending Feedback"
                    MyCell.Interior.Color = RGB(255, 255, 0)
                Case "Stuck"
                    MyCell.Interior.Color = RGB(255, 0, 0)
            End Select
        Next MyCell
    End Sub
  1. Εκτελέστε τον κώδικα σας – πατώντας F5 ή Εκτέλεση >> Εκτέλεση Sub / UserForm.
  2. Θα παρατηρήσετε ότι ο πίνακας ελέγχου κατάστασης ενημερώθηκε όπως φαίνεται παρακάτω:

Πίνακας ελέγχου κατάστασης με VBA

  1. Αποθηκεύστε τον κώδικά σας και κλείστε τον επεξεργαστή VBA.

Συμπεράσματα

Η παραπάνω διαδικασία σας επιτρέπει να ρυθμίσετε δυναμικά το χρώμα των κελιών στο Excel με βάση την δεδομένη τιμή, κάνοντάς τον πίνακα σας πιο οπτικά ευχάριστο και λειτουργικό. Αυτό μπορεί να βοηθήσει στην καλύτερη παρουσίαση δεδομένων και στην πιο εύκολη παρακολούθηση της προόδου.

(24) Σχόλια

  1. Δημήτρης -

    Ενδιαφέρον θέμα! Μπορείς να μοιραστείς και τη διαδικασία για να επιστρέφεις στο κανονικό χρώμα; Θα ήταν χρήσιμο.

  2. Φαίη -

    Έχω δοκιμάσει κάποια πράγματα με το VBA, αλλά έρχεται μια στιγμή που μπερδεύομαι... θα προσπαθήσω να το κατανοήσω καλύτερα

  3. Στέφανος -

    Συγκλονιστική ανάρτηση! Είναι καταπληκτικό πώς μπορείς να αυτοματοποιήσεις διαδικασίες με VBA. Θέλω να μάθω περισσότερα

  4. Μαρίνα -

    Μπράβο! Και το VBA είναι συναρπαστικότερο όταν το χρησιμοποιείς για να χρωματίσεις κελιά ανάλογα με τις συνθήκες

  5. Ευάγγελος -

    Δυο-τρεις φορές γέλασα γιατί έπαθα ένα μικρό μπέρδεμα με τις γραμμές κώδικα! Καλή δουλειά

  6. Αργυρώ -

    Έχω ήδη αναρτήσει το παράδειγμά σου στην ομάδα των συνεργατών μου! Είναι πάρα πολύ χρήσιμο

  7. Νίκος -

    Όντως, η χρήση VBA μπορεί να απλοποιήσει πολλές διαδικασίες. Ευχαριστούμε για τις συμβουλές

  8. Αναστασία -

    Πραγματικά καλό! Το VBA είναι ουσιαστικά το μέλλον για την αυτοματοποίηση στο Excel

  9. Μαρία -

    Ευχαριστώ πολύ για την ανάρτηση! Ήξερα ότι το Excel μπορεί να κάνει πολλά, αλλά το VBA μου φαίνεται σαν μαγεία

  10. Δανάη -

    Ευχαριστώ για την υπέροχη ανάρτηση! Είμαι σε φάση εκμάθησης και η βοήθεια σου είναι πολύτιμη

  11. Πάνος -

    Μου έχει πάρει πολύ χρόνο να κατανοήσω το VBA. Χρειάζομαι περισσότερη πρακτική

  12. Γιώργος -

    Εξαιρετικός οδηγός! Το VBA είναι πραγματικά ισχυρό εργαλείο για τη διαχείριση δεδομένων στο Excel.

  13. Κατερίνα -

    Πολύ ενδιαφέρον θέμα! Μπορεί να είναι λίγο περίπλοκο, αλλά αξίζει τον κόπο να μάθω το VBA.

  14. Αλέξανδρος -

    Χρειάζομαι βοήθεια! Επικεντρωνόμουν σε άλλες γλώσσες προγραμματισμού και το VBA μπερδεύει. Πώς να ξεκινήσω;

  15. Δημήτρης -

    Μου άρεσε πολύ το παράδειγμα που έδωσες. Μπορείς να μοιραστείς και άλλες περιπτώσεις; Σαφώς θα με βοηθήσουν.

  16. Ελένη -

    Η ανάρτηση αυτή με έκανε να νιώσω χαρά! Υπάρχουν τόσες δυνατότητες με το VBA, δεν το είχα σημειώσει πριν.

  17. Κωνσταντίνα -

    Η ανάρτηση είναι πολύ κατατοπιστική! Έχω κάποια προβλήματα με την εφαρμογή του VBA, αλλά θα προσπαθήσω πάλι

  18. Τζένη -

    Πρέπει να το δοκιμάσω αυτό! Δεν ήξερα ότι μπορώ να κάνω τόσα πολλά με το Excel. Ευχαριστώ που το μοιράστηκες!

  19. Ναταλία -

    Συμφωνώ! Είναι τόσο ενθαρρυντικό να βλέπεις τη δουλειά σου να αποδίδει μέσα στο Excel. Συνεχίστε έτσι!

  20. Σοφία -

    Κάποιος μπορεί να μου πει πώς να αλλάξω το χρώμα αν το κελί είναι κενό; Ευχαριστώ!

  21. Κώστας -

    Μπορείς να δώσεις και περισσότερα παραδείγματα; Θα ήταν υπέροχο να δούμε και άλλες περιπτώσεις

  22. Άρης -

    Το VBA είναι καταπληκτικό για να κάνεις τα πράγματα πιο γρήγορα στο Excel! Ευχαριστώ για τις τρομερές ιδέες

  23. Λευτέρης -

    Διαθέτω μερικές ιδέες για αυτό! Αν κάνω κάτι δικό μου με το VBA, θα το μοιραστώ με όλους

  24. Φίλιππος -

    Πολύ χρήσιμο άρθρο. Έχω προσπαθήσει να αλλάξω χρώματα κελιών με άλλες μεθόδους, αλλά το VBA είναι όντως καλύτερο

Αφήστε ένα σχόλιο

Πρότυπο PowerPoint Ετήσιας Αναφοράς για Μη Κερδοσκοπικούς Οργανισμούς: Επιλογές Δωρεάν Λήψης και Λίστα Ελέγχου Διαφανειών για Διαφάνειες

Πρότυπο PowerPoint Ετήσιας Αναφοράς για Μη Κερδοσκοπικούς Οργανισμούς: Επιλογές Δωρεάν Λήψης και Λίστα Ελέγχου Διαφανειών για Διαφάνειες

Δημιουργήστε μια σαφή ετήσια αναφορά μη κερδοσκοπικού οργανισμού στο PowerPoint με ένα δωρεάν πρότυπο, πρακτική δομή διαφανειών, μετρήσεις αντίκτυπου, οικονομικά στοιχεία και συμβουλές παρουσίασης έτοιμες για δωρητές.

Πρότυπο PowerPoint Minimalist Investor Pitch Deck για νεοσύστατες τεχνολογικές επιχειρήσεις: Τι να συμπεριλάβετε και τι να παραλείψετε

Πρότυπο PowerPoint Minimalist Investor Pitch Deck για νεοσύστατες τεχνολογικές επιχειρήσεις: Τι να συμπεριλάβετε και τι να παραλείψετε

Δημιουργήστε μια παρουσίαση για επενδυτές σε νεοσύστατες επιχειρήσεις τεχνολογίας σε PowerPoint με πρακτική δομή διαφανειών, μηνύματα με προτεραιότητα στα αποδεικτικά στοιχεία, προσβάσιμο σχεδιασμό και λιγότερους περισπασμούς.

Πρότυπο απλού πίνακα ανάθεσης εργασιών για το Word: Μια πρακτική έκδοση για διευθυντές μικρών ομάδων

Πρότυπο απλού πίνακα ανάθεσης εργασιών για το Word: Μια πρακτική έκδοση για διευθυντές μικρών ομάδων

Χρησιμοποιήστε αυτό το απλό πρότυπο πίνακα ανάθεσης εργασιών στο Word για να αναθέσετε κατόχους, όρια αποφάσεων, προθεσμίες και σημεία ελέγχου χωρίς να περιπλέξετε υπερβολικά μια μικρή ομάδα.

Απλό πρότυπο φύλλου παρακολούθησης παιδικού σταθμού: Εκτυπώσιμη σύνδεση και αποσύνδεση για φροντίδα παιδιών στο σπίτι

Απλό πρότυπο φύλλου παρακολούθησης παιδικού σταθμού: Εκτυπώσιμη σύνδεση και αποσύνδεση για φροντίδα παιδιών στο σπίτι

Χρησιμοποιήστε αυτό το απλό εκτυπώσιμο φύλλο παρακολούθησης παιδικού σταθμού για φροντίδα παιδιών στο σπίτι, με ονόματα παιδιών, ώρες άφιξης/αναχώρησης, υπογραφές και συμβουλές συμμόρφωσης.

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

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

Χρησιμοποιήστε αυτό το εκτυπώσιμο πρότυπο στρατηγικής μάρκετινγκ μίας σελίδας για να ορίσετε το τοπικό σας κοινό, την προσφορά, τα κανάλια, τον προϋπολογισμό, τις εβδομαδιαίες ενέργειες και τους μετρήσιμους στόχους σας.

Πώς να σταματήσετε το Excel από την αυτόματη αλλαγή αριθμών σε ημερομηνίες

Πώς να σταματήσετε το Excel από την αυτόματη αλλαγή αριθμών σε ημερομηνίες

Αποτρέψτε το Excel από τη μετατροπή τιμών όπως 1/2, 11-53 ή JAN1 σε ημερομηνίες. Μάθετε αξιόπιστες διορθώσεις για την πληκτρολόγηση, την επικόλληση, τις εισαγωγές CSV και τα κελιά που έχουν ήδη μετατραπεί.

Πρότυπο PowerPoint παρουσίασης σύγχρονης καταχώρισης ακινήτων (δωρεάν): Τι να συμπεριλάβετε

Πρότυπο PowerPoint παρουσίασης σύγχρονης καταχώρισης ακινήτων (δωρεάν): Τι να συμπεριλάβετε

Δημιουργήστε μια προσεγμένη καταχώριση ακινήτων στο PowerPoint δωρεάν με ένα πρακτικό σχέδιο διαφανειών, φωτογραφία, συμβουλές για την επωνυμία, την προσβασιμότητα, τη συμμόρφωση και τις εξαγωγές.

Πώς να διορθώσετε το σφάλμα «Το Outlook δεν μπορεί να στείλει email αλλά μπορεί να λάβει»

Πώς να διορθώσετε το σφάλμα «Το Outlook δεν μπορεί να στείλει email αλλά μπορεί να λάβει»

Διορθώστε το Outlook όταν μπορείτε να λαμβάνετε email αλλά δεν μπορείτε να στείλετε. Ελέγξτε τον φάκελο Αποστολής, τη λειτουργία εκτός σύνδεσης, τη σύνδεση, τις ρυθμίσεις SMTP, τα προφίλ και τις αλλαγές του Microsoft 365.

Απλό Πρότυπο Excel για Δεκαπενθήμερο Ιχνηλάτη Μισθοδοσίας για Μικρές Ομάδες: Ένας Πρακτικός Οδηγός Ρύθμισης

Απλό Πρότυπο Excel για Δεκαπενθήμερο Ιχνηλάτη Μισθοδοσίας για Μικρές Ομάδες: Ένας Πρακτικός Οδηγός Ρύθμισης

Δημιουργήστε έναν απλό δεκαπενθήμερο ιχνηλάτη μισθοδοσίας σε Excel για μια μικρή ομάδα, με ώρες, αποδοχές, κρατήσεις, σημάνσεις ελέγχου, συνοπτικές αναφορές και οδηγίες τήρησης αρχείων.

Εκτυπώσιμη λίστα ελέγχου σχεδιασμού εκδηλώσεων και πρότυπο προϋπολογισμού για το Word: Τι να συμπεριλάβετε και πότε να χρησιμοποιήσετε το Excel αντ' αυτού

Εκτυπώσιμη λίστα ελέγχου σχεδιασμού εκδηλώσεων και πρότυπο προϋπολογισμού για το Word: Τι να συμπεριλάβετε και πότε να χρησιμοποιήσετε το Excel αντ' αυτού

Δημιουργήστε ή προσαρμόστε ένα εκτυπώσιμο πρότυπο λίστας ελέγχου σχεδιασμού εκδηλώσεων και προϋπολογισμού στο Microsoft Word, με πρακτικές ενότητες, συμβιβασμούς και συμβουλές για το Word έναντι του Excel.