/ / / Μήνες ονόματα στο Excel VBA

Ονόματα μηνών στο Excel VBA

Παρακάτω θα δούμε ένα πρόγραμμα στο Excel VBA που δημιουργεί ένα Λειτουργία που καθορίζεται από το χρήστη που χρησιμοποιεί τη συνάρτηση Array για να επιστρέψει το ονόματα των μηνών.

Οι λειτουργίες που ορίζονται από το χρήστη πρέπει να τοποθετηθούν σε μια ενότητα.

1. Ανοίξτε τον Επεξεργαστή Visual Basic και κάντε κλικ στην επιλογή Εισαγωγή, Ενότητα.

2. Προσθέστε την ακόλουθη γραμμή κώδικα:

Function MONTHNAMES()

Το όνομα της Λειτουργίας μας είναι MONTHNAMES. Το άδειο τμήμα μεταξύ των στηριγμάτων σημαίνει ότι δίνουμε το Excel VBA τίποτα ως είσοδο.

3. Η συνάρτηση Array μας επιτρέπει να εκχωρήσουμε τιμές σε έναν πίνακα Variant σε μία γραμμή κώδικα.

MONTHNAMES = Array("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec")

4. Μην ξεχάσετε να τερματίσετε τη λειτουργία.

End Function

5. Τώρα μπορείτε να χρησιμοποιήσετε αυτήν τη λειτουργία, όπως και κάθε άλλη λειτουργία Excel, για να επιστρέψετε τα ονόματα των μηνών. Επιλέξτε δώδεκα οριζόντια κελιά, πληκτρολογήστε τη λειτουργία = MONTHNAMES () και πιέστε CTRL + SHIFT + ENTER.

Αποτέλεσμα:

Ονόματα μηνών στο Excel VBA

Σημείωση: Δεν μπορείτε να διαγράψετε ένα μήνα. Για να διαγράψετε τους μήνες, επιλέξτε το εύρος A1: L1 και πατήστε Διαγραφή. Αυτή η λειτουργία είναι διαθέσιμη μόνο σε αυτό το βιβλίο εργασίας.

Επίσης διαβάστε: