Πίνακας περιεχομένων:
- Η επίσημη σύνταξη της μεθόδου GetOpenFilename έχει ως εξής:
- Το όρισμα fileFilter καθορίζει τι εμφανίζεται στην αναπτυσσόμενη λίστα Files of Type (Τύποι αρχείων). Αυτό το όρισμα αποτελείται από ζεύγη φίλτρων φίλτρων ακολουθούμενα από την προδιαγραφή φίλτρου μπαλαντέρ, με κόμματα που χωρίζουν κάθε τμήμα και ζεύγος. Αν παραλειφθεί, αυτό το όρισμα έχει ως προεπιλογή τα εξής:
Βίντεο: "Πρασοτυρόπιτα"'Ανοιγμα φύλλου με την μέθοδο του Ηλιου - Delicious leek and Greek cheese feta pie 2024
Αν η διαδικασία VBA σας ζητάει από το χρήστη ένα όνομα αρχείου, μπορείτε να χρησιμοποιήσετε τη λειτουργία InputBox και αφήστε τον χρήστη του Excel να κάνει κάποια πληκτρολόγηση. Ένα κουτί εισόδου συνήθως δεν είναι το καλύτερο εργαλείο για αυτή την εργασία, ωστόσο, επειδή οι περισσότεροι χρήστες δυσκολεύονται να θυμηθούν μονοπάτια, πλάτες, ονόματα αρχείων και επεκτάσεις αρχείων. Με άλλα λόγια, είναι πάρα πολύ εύκολο να βιδώσετε όταν πληκτρολογείτε ένα όνομα αρχείου. Για καλύτερη επίλυση αυτού του προβλήματος, χρησιμοποιήστε τη μέθοδο GetOpenFilename του αντικειμένου της εφαρμογής, η οποία εξασφαλίζει ότι ο κώδικας σας θα πάρει τα χέρια του με ένα έγκυρο όνομα αρχείου, συμπεριλαμβανομένης της πλήρους διαδρομής του. Η μέθοδος GetOpenFilename εμφανίζει το οικείο παράθυρο διαλόγου Άνοιγμα (ένας νεκρός ήχος κλήσης για το πλαίσιο διαλόγου Excel εμφανίζεται όταν επιλέγετε Αρχείο → Άνοιγμα → Αναζήτηση).
Η σύνταξη για τη μέθοδο GetOpenFilename
Η επίσημη σύνταξη της μεθόδου GetOpenFilename έχει ως εξής:
αντικείμενο. Το όνομα GetOpenFilename ([fileFilter], [filterIndex], [title], [buttonText], [multiSelect])
Η μέθοδος GetOpenFilename λαμβάνει τα παρακάτω προαιρετικά επιχειρήματα.
Argument
| Τι κάνει | FileFilter |
|---|---|
| Καθορίζει τους τύπους αρχείων που εμφανίζονται στο παράθυρο διαλόγου | (για παράδειγμα *.TXT). Μπορείτε να ορίσετε διάφορα φίλτρα για τον χρήστη
για να επιλέξετε. FilterIndex |
| Προσδιορίζει ποια από τα φίλτρα αρχείων εμφανίζει το παράθυρο διαλόγου με | προεπιλογή.
Τίτλος |
| Καθορίζει τη λεζάντα για τη γραμμή τίτλου | του πλαισίου διαλόγου.
ButtonText |
| Ignored (χρησιμοποιείται μόνο για την έκδοση Macintosh του Excel). | MultiSelect |
| Αν είναι αληθές, ο χρήστης μπορεί να επιλέξει πολλά αρχεία. |
|
Το όρισμα fileFilter καθορίζει τι εμφανίζεται στην αναπτυσσόμενη λίστα Files of Type (Τύποι αρχείων). Αυτό το όρισμα αποτελείται από ζεύγη φίλτρων φίλτρων ακολουθούμενα από την προδιαγραφή φίλτρου μπαλαντέρ, με κόμματα που χωρίζουν κάθε τμήμα και ζεύγος. Αν παραλειφθεί, αυτό το όρισμα έχει ως προεπιλογή τα εξής:
Όλα τα αρχεία (*. *), *. *
Παρατηρήστε ότι αυτή η συμβολοσειρά αποτελείται από δύο μέρη, διαχωρισμένα με κόμμα:
Όλα τα αρχεία (*. *)
και
*. *
Το πρώτο μέρος αυτής της συμβολοσειράς είναι το κείμενο που εμφανίζεται στην αναπτυσσόμενη λίστα Αρχεία τύπου. Το δεύτερο μέρος καθορίζει τα αρχεία που εμφανίζει το παράθυρο διαλόγου. Για παράδειγμα, *. * σημαίνει
όλα τα αρχεία. Ο κώδικας στο ακόλουθο παράδειγμα ανοίγει ένα παράθυρο διαλόγου που ζητά από το χρήστη ένα όνομα αρχείου.Η διαδικασία ορίζει πέντε φίλτρα αρχείων. Παρατηρήστε ότι η ακολουθία συνεχούς γραμμής VBA χρησιμοποιείται για τη ρύθμιση της μεταβλητής Φίλτρο. αυτό βοηθά στην απλοποίηση αυτού του μάλλον περίπλοκου επιχειρήματος.
Sub GetImportFileName () Dim Finfo ως Dim String FilterIndex ως Τίτλος μακρού Dim ως String Dim Όνομα_αρχείου ως Παραλλαγή 'Ρύθμιση λίστας φίλτρων αρχείων FInfo = "Αρχεία κειμένου (*.txt), *. txt, "& _" αρχεία Lotus (*.prn), *. prn, "& _" Αρχεία διαχωρισμένα με κόμματα (*.csv), *. csv, "& _" αρχεία ASCII (*. asc), *. asc, "& _" Όλα τα αρχεία (*. *), *. *" ' Απεικόνιση *. * από προεπιλογή FilterIndex = 5 'Ρύθμιση της περίληψης πλαισίου διαλόγου Title = "Επιλογή ενός αρχείου για εισαγωγή"' Λήψη ονόματος αρχείου FileName = Εφαρμογή. GetOpenFilename (FInfo, _ FilterIndex, Title) 'Πληροφορίες χειρισμού επιστροφής από το παράθυρο διαλόγου If FileName = False Στη συνέχεια MsgBox "Δεν επιλέχθηκε αρχείο. "Else MsgBox" Έχετε επιλέξει "& FileName End If End Sub
Εδώ εμφανίζεται το παράθυρο διαλόγου Excel που εμφανίζεται όταν εκτελέσετε αυτή τη διαδικασία. Η εμφάνιση μπορεί να διαφέρει ανάλογα με την έκδοση των Windows που χρησιμοποιείτε και τις επιλογές οθόνης που έχετε ορίσει.
Η μέθοδος GetOpen Filename εμφανίζει ένα προσαρμόσιμο παράθυρο διαλόγου και επιστρέφει τη διαδρομή και το όνομα του επιλεγμένου αρχείου. Δεν ανοίγει το αρχείο.
Βιβλία εργασίας. Ανοίξτε το όνομα_αρχείου
Παρατηρήστε ότι η μεταβλητή FileName δηλώνεται ως τύπος δεδομένων Variant. Αν ο χρήστης κάνει κλικ στην επιλογή "Ακύρωση", αυτή η μεταβλητή περιέχει μια τιμή Boolean (False). Διαφορετικά, το FileName είναι μια συμβολοσειρά. Επομένως, χρησιμοποιώντας έναν τύπο δεδομένων Variant χειρίζονται και τις δύο δυνατότητες.
