Πώς να ορίσετε ένα χρώμα κελιού Excel σύμφωνα με μια συνθήκη με το VBA;
Ανακαλύψτε πώς να ρυθμίσετε το χρώμα κελιού Excel ανάλογα με μια συνθήκη χρησιμοποιώντας VBA.
Σήμερα θα μάθουμε πώς να ελέγχουμε εύκολα εάν ένα ή πολλά κελιά είναι κενά χρησιμοποιώντας τη Visual Basic for Applications. Το περιεχόμενο είναι σχετικό για το Excel 2019 / 365, 2016 και παλαιότερες εκδόσεις του Microsoft Office.
Εργασία προετοιμασίας
Πριν ξεκινήσετε την κωδικοποίηση με VBA στο Excel, θα πρέπει να βεβαιωθείτε ότι η καρτέλα ανάπτυξης είναι ενεργοποιημένη. Εάν δεν συμβαίνει αυτό, δείτε ευγενικά αυτό το σύντομο σεμινάριο .
Έλεγχος εάν η περιοχή κελιών του Excel είναι άδεια με VBA
Sub Check_Cell_is_empty_alt()
Dim rng As Range
Set rng = Selection
For Each Cell In rng
If IsEmpty(Cell.Value) = True Then
Debug.Print ("Empty")
Else
Debug.Print ("Not Empty")
End If
Next Cell
End Sub
Πιθανές επεκτάσεις στον κώδικα: Μπορείτε προφανώς να επεκτείνετε αυτόν τον κωδικό ανάλογα με τις ανάγκες σε περίπτωση που σας ενδιαφέρει να παραλείψετε κενές τιμές ή απλώς να μην κάνετε τίποτα σε περίπτωση που τα κελιά δεν είναι γεμάτα. Ομοίως, μπορείτε να ελέγξετε εάν το ίδιο το εύρος είναι κενό, δηλαδή – δεν υπάρχουν μαύρα κελιά.
Έλεγχος μη κενών πεδίων
Με τον ίδιο τρόπο μπορείτε να χρησιμοποιήσετε την ιδιότητα IsEmpty για να ελέγξετε για πεδία που δεν είναι κενά.
If Not IsEmpty(Cell.Value) = True Then
Debug.Print ("Not Empty")
Else
Debug.Print ("Empty")
End If
Dim i Όσο σκοτεινός c Όσο Dim myRange Ως Range Dim myCell As Range Ορισμός myRange = Range("A1:A10") Για κάθε myCell In myRange ' c = c + 1 If IsEmpty(myCell) Τότε myCell.Interior.Color = RGB(255, 87, 87) i = i + 1 End If Next myCell MsgBox _ "Υπάρχουν συνολικά " &αμπέραζ; i & " άδεια κελιά από " &αμπέραζ; κατασκήνωση; "."
Ανακαλύψτε πώς να ρυθμίσετε το χρώμα κελιού Excel ανάλογα με μια συνθήκη χρησιμοποιώντας VBA.
Οδηγίες για την κοπή εικόνων σε κύκλους στο PowerPoint. Ανακαλύψτε πόσο απλά μπορείτε να κόψετε φωτογραφίες σε κύκλους για εντυπωσιακές παρουσιάσεις.
Μάθετε πώς να κάνετε εναλλαγή από πληκτρολόγια LTR σε RTL στο Microsoft Word.
Μάθετε πώς να χρησιμοποιήσετε διαφορετικές γραμματοσειρές στο Discord. Οι επιλογές γραμματοσειρών είναι ποικίλες και πλούσιες.
Κορυφαίες εφαρμογές κοπής ήχων κλήσης στο Android για τη δημιουργία μοναδικών ήχων κλήσης. Ανακαλύψτε τις καλύτερες επιλογές για να προσαρμόσετε το τηλέφωνό σας.
Οδηγίες για την αλλαγή του ονόματος της ομάδας συνομιλίας στο Facebook Messenger. Αυτή τη στιγμή στην ομαδική συνομιλία του Facebook Messenger, μπορούμε εύκολα να αλλάξουμε το όνομα της ομάδας συνομιλίας.
Ανακαλύψτε πώς να επαναφέρετε διαγραμμένες αναρτήσεις στο Facebook εύκολα και γρήγορα. Μαθαίνετε όλες τις λεπτομέρειες για την ανάκτηση διαγραμμένων αναρτήσεων
Οδηγίες για την ακρόαση μουσικής στους Χάρτες Google Επί του παρόντος, οι χρήστες μπορούν να ταξιδέψουν και να ακούσουν μουσική χρησιμοποιώντας την εφαρμογή Google Map στο iPhone. Σήμερα, το WebTech360 σας προσκαλεί
Οδηγίες για τη χρήση του LifeBOX - Η διαδικτυακή υπηρεσία αποθήκευσης της Viettel, το LifeBOX είναι μια νέα διαδικτυακή υπηρεσία αποθήκευσης της Viettel με πολλά ανώτερα χαρακτηριστικά
Πώς να ενημερώσετε την κατάσταση στο Facebook Messenger, το Facebook Messenger στην πιο πρόσφατη έκδοση παρείχε στους χρήστες μια εξαιρετικά χρήσιμη δυνατότητα: αλλαγή