Για να υπολογίσετε τη μέση τιμή των αριθμών χρησιμοποιώντας μακροεντολή VBA, μπορείτε να καλέσετε την αντίστοιχη συνάρτηση απευθείας στη μακροεντολή VBA
Οι υπολογισμοί που χρησιμοποιούν συναρτήσεις πίνακα δημιουργούνται συνήθως χρησιμοποιώντας το πληκτρολόγιο. Εναλλακτικά, μπορείτε επίσης να χρησιμοποιήσετε τον οδηγό τύπου. Τι κάνετε όμως όταν χρειάζεστε το αποτέλεσμα μιας λειτουργίας πίνακα σε μια μακροεντολή Excel, αλλά δεν θέλετε να εισαγάγετε τον τύπο σε ένα κελί;
Μπορείτε επίσης να χρησιμοποιήσετε τις συναρτήσεις του πίνακα Excel άμεσα ως εντολές στις μακροεντολές σας. Φανταστείτε ότι θέλετε να εισαγάγετε το μέσο όρο όλων των αριθμών από μια στήλη σε ένα κελί. Χρησιμοποιήστε την ακόλουθη μακροεντολή:
Υπομέση τιμή στήλης εκτός τιμής ()
ActiveCell.Value = WorksheetFunction.Average (Στήλες (2))
Τέλος υπο
Εάν θέλετε να γράψετε το αποτέλεσμα της συνάρτησης σε ένα σταθερό κελί (για παράδειγμα κελί Α1), αντικαταστήστε την έκφραση "ActiveCell". Για παράδειγμα, γράψτε το αποτέλεσμα στο κελί A1 με την ακόλουθη εντολή:
Εύρος ("A1"). Value = WorksheetFunction.Average (Στήλες (2))
Ορίζετε ποια στήλη πρόκειται να προστεθεί χρησιμοποιώντας την τιμή μετά τις "Στήλες". Οι στήλες αριθμούνται από αριστερά προς τα δεξιά, η στήλη Α έχει τον αριθμό 1.
Το παρακάτω σχήμα δείχνει πώς μπορεί να είναι το αποτέλεσμα αν ξεκινήσετε τη συνάρτηση σε έναν πίνακα:
Για να εισαγάγετε τη μακροεντολή, πατήστε ALT F11 στο Excel για να εμφανιστεί ο επεξεργαστής VBA. Χρησιμοποιήστε την εντολή INSERT - MODULE για να εισαγάγετε ένα κενό φύλλο λειτουργικής μονάδας. Για να ξεκινήσετε τη μακροεντολή απευθείας από το Excel, χρησιμοποιήστε τον συνδυασμό πλήκτρων ALT F8.
