Δημιουργήστε τις δικές σας ιδιότητες Excel μέσω VBA και αποθηκεύστε τις σε περιόδους σύνδεσης

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

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

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

Ανάλογα με την έκδοση του Excel που χρησιμοποιείτε, ο τρόπος για να φτάσετε στις επιμέρους ιδιότητες είναι διαφορετικός:

  1. Excel έως την έκδοση 2003: Καλέστε την εντολή FILE - PROPERTIES.
  2. Excel 2007: Ενεργοποιήστε την εντολή PREPARE - FILE PROPERTIES - ADVANCED PROPERTIES.
  3. Excel 2010: Χρησιμοποιήστε την εντολή ΑΡΧΕΙΟ - ΠΛΗΡΟΦΟΡΙΕΣ - ΙΔΙΟΤΗΤΕΣ - ΕΠΕΚΤΑΣΕΙΣ ΙΔΙΟΤΗΤΕΣ.

Εμφανίζεται ένα παράθυρο διαλόγου σε όλες τις εκδόσεις του Excel. Κάντε κλικ στην καρτέλα CUSTOMIZE σε αυτό το παράθυρο.

Το παράθυρο σας εμφανίζει όλες τις ιδιότητες που ορίζονται από το χρήστη. Με αυτόν τον τρόπο μπορείτε επίσης να αλλάξετε ιδιότητες ή να ορίσετε νέες ιδιότητες.

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

Για να γίνει αυτό, πρέπει να έχετε πρόσβαση στα περιεχόμενα των ιδιοτήτων χρησιμοποιώντας μια μακροεντολή. Μπορείτε να χρησιμοποιήσετε την ακόλουθη μακροεντολή VBA για να προσθέσετε τη δική σας ιδιότητα στις ιδιότητες:

Sub LayingPropertyAn ()
Στο Σφάλμα Συνέχιση Επόμενο
ActiveWorkbook.CustomDocumentProperties.Add _
Όνομα: = "ExcelDaily", LinkToContent: = False, _
Τύπος: = msoPropertyTypeString, Τιμή: = "Δοκιμή περιεχομένου"
MsgBox ActiveWorkbook.CustomDocumentProperties ("ExcelDaily"). Τιμή
Σφάλμα GoTo 0
Τέλος υπο

Η μακροεντολή δημιουργεί μια ιδιότητα με το όνομα "ExcelDaily". Λαμβάνει το περιεχόμενο "δοκιμαστικό περιεχόμενο". Μετά τη δημιουργία, η ιδιότητα διαβάζεται ξανά αμέσως και εμφανίζεται σε ένα παράθυρο μηνύματος:

Η νέα ιδιότητα μπορεί επίσης να βρεθεί αργότερα στο παράθυρο διαλόγου ΕΠΕΚΤΑΣΕΙΣ ΙΔΙΟΤΗΤΩΝ. Το παρακάτω σχήμα δείχνει πώς φαίνεται το παράθυρο μετά την προσθήκη της ιδιότητας από τη μακροεντολή:

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

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

wave wave wave wave wave