Καθορίστε τον αριθμό των μη κενών κελιών σε μια περιοχή Excel χρησιμοποιώντας μια μακροεντολή VBA

Πίνακας περιεχομένων

Πώς να μετρήσετε πόσα κελιά σε μια στήλη Excel έχουν περιεχόμενο

Θέλετε να χρησιμοποιήσετε μια μακροεντολή για να μάθετε πόσα κελιά σε μια στήλη περιέχουν περιεχόμενο (δηλαδή, δεν είναι κενά). Φυσικά, μπορείτε να το κάνετε μέσω ενός βρόχου στο VBA. Ωστόσο, είναι ευκολότερο αν εκτελέσετε την εργασία χρησιμοποιώντας μια συνάρτηση Excel. Η συνάρτηση Excel NUMBER έχει σχεδιαστεί ακριβώς για αυτό το σκοπό. Χρησιμοποιήστε αυτήν τη συνάρτηση σε μια μακροεντολή και μεταφέρετε το αποτέλεσμα σε μια μεταβλητή ή κελί.

Για να βρείτε τον αριθμό όλων των κελιών που χρησιμοποιούνται στη στήλη Β, χρησιμοποιήστε την ακόλουθη μακροεντολή:

Υπο -στήλη αριθμού ()
ActiveCell.Value = WorksheetFunction.Count (Στήλες (2))
Τέλος υπο

Για να εισαγάγετε τη μακροεντολή, πατήστε ALT F11 στο Excel για να εμφανιστεί ο επεξεργαστής VBA. Επιλέξτε την εντολή INSERT - MODULE στον επεξεργαστή VBA και εισαγάγετε τη μακροεντολή. Για να ξεκινήσετε τη μακροεντολή, ενεργοποιήστε τον συνδυασμό πλήκτρων ALT F8 στο Excel. Οι δύο συντομεύσεις πληκτρολογίου λειτουργούν σε όλες τις εκδόσεις του Excel.

Εάν θέλετε να γράψετε το αποτέλεσμα της συνάρτησης σε ένα σταθερό κελί (για παράδειγμα κελί Α1), αντικαταστήστε την έκφραση AKTIVECELL με RANGE ("A1") και χρησιμοποιήστε τη διεύθυνση κελιού της επιλογής σας.

Ορίζετε ποια στήλη πρόκειται να προστεθεί χρησιμοποιώντας την παράμετρο μετά τις στήλες. Οι στήλες αριθμούνται από αριστερά προς τα δεξιά, η στήλη Α έχει τον αριθμό 1.

Το παρακάτω σχήμα δείχνει πώς φαίνεται το αποτέλεσμα αν ξεκινήσετε τη συνάρτηση σε έναν πίνακα:

Θα βοηθήσει στην ανάπτυξη του τόπου, μοιράζονται τη σελίδα με τους φίλους σας

wave wave wave wave wave