Μια μακροεντολή Excel για να προσδιορίσετε εάν υπάρχει βιβλίο εργασίας

Αυτή η μακροεντολή Excel σάς επιτρέπει να περάσετε μια διαδρομή αρχείου για να αξιολογήσετε εάν το αρχείο βρίσκεται εκεί. Για παράδειγμα, μπορεί να έχετε μια διαδικασία που χειρίζεται ένα αρχείο κάπου στον υπολογιστή σας. Για παράδειγμα, μπορεί να χρειαστεί να ανοίξετε ένα υπάρχον βιβλίο εργασίας για να προσθέσετε δεδομένα σε αυτό σε καθημερινή βάση. Σε αυτήν την περίπτωση, ίσως χρειαστεί να ελέγξετε για να δείτε εάν το αρχείο που πρέπει να χειριστείτε υπάρχει.

Πώς λειτουργεί η μακροεντολή

Το πρώτο πράγμα που πρέπει να παρατηρήσετε σχετικά με αυτήν τη μακροεντολή είναι ότι είναι μια συνάρτηση, όχι μια διαδικασία Sub. Κάνοντας αυτή τη μακροεντολή συνάρτηση, μπορείτε να περάσετε οποιαδήποτε διαδρομή αρχείου σε αυτήν.

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

Η συνάρτηση FileExists (FPath ως συμβολοσειρά) ως Boolean
'Βήμα 1: Δηλώστε τις μεταβλητές σας
    Dim FName As String
'Βήμα 2: Χρησιμοποιήστε τη συνάρτηση Dir για να λάβετε το όνομα αρχείου
    FName = Dir(FPath)
'Βήμα 3: Εάν υπάρχει αρχείο, επιστρέψτε το True. αλλιώς Λάθος
    Αν FName <> " Τότε FileExists = True _
    Άλλο: FileExists = False
Λειτουργία τερματισμού

Το βήμα 1 δηλώνει μια μεταβλητή String που κρατά το όνομα αρχείου που επιστρέφει από τη συνάρτηση Dir. FName είναι το όνομα της μεταβλητής String.

Στο Βήμα 2, προσπαθείτε να ορίσετε τη μεταβλητή FName. Αυτό το κάνετε περνώντας τη μεταβλητή FPath στη συνάρτηση Dir. Αυτή η μεταβλητή FPath μεταβιβάζεται μέσω των δηλώσεων συναρτήσεων (δείτε την πρώτη γραμμή του κώδικα). Αυτή η δομή σας αποτρέπει από το να χρειάζεται να κωδικοποιήσετε ένα μονοπάτι αρχείου, μεταβιβάζοντάς το ως μεταβλητή.

Εάν η μεταβλητή FName δεν μπορεί να οριστεί, η διαδρομή που περάσατε δεν υπάρχει. Έτσι, η μεταβλητή FName είναι κενή. Το βήμα 3 απλώς μεταφράζει αυτό το αποτέλεσμα σε μια έκφραση True ή False.

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

Η ακόλουθη μακροεντολή δείχνει τον τρόπο χρήσης αυτής της συνάρτησης:

Sub Macro1()
    If FileExists("C:TempMyNewBook.xlsx") = True Τότε
        MsgBox "Το αρχείο υπάρχει."
    Αλλού
        MsgBox "Το αρχείο δεν υπάρχει."
    Τέλος εαν
End Sub

Πώς να χρησιμοποιήσετε τη μακροεντολή

Για να εφαρμόσετε αυτήν τη μακροεντολή, μπορείτε να αντιγράψετε και να επικολλήσετε και τα δύο κομμάτια κώδικα σε μια τυπική λειτουργική μονάδα:

Ενεργοποιήστε το Visual Basic Editor πατώντας Alt+F11.

Κάντε δεξί κλικ στο όνομα του έργου/του βιβλίου εργασίας στο παράθυρο του έργου.

Επιλέξτε Εισαγωγή→ Μονάδα.

Πληκτρολογήστε ή επικολλήστε τον κωδικό στη μονάδα που δημιουργήθηκε πρόσφατα.


Πώς να αποκλείσετε το Microsoft Word από το άνοιγμα αρχείων σε λειτουργία μόνο για ανάγνωση στα Windows

Πώς να αποκλείσετε το Microsoft Word από το άνοιγμα αρχείων σε λειτουργία μόνο για ανάγνωση στα Windows

Πώς να αποκλείσετε το Microsoft Word από το άνοιγμα αρχείων σε λειτουργία μόνο για ανάγνωση στα Windows Το Microsoft Word ανοίγει αρχεία σε λειτουργία μόνο για ανάγνωση, καθιστώντας αδύνατη την επεξεργασία του; Μην ανησυχείτε, οι μέθοδοι είναι παρακάτω

Πώς να διορθώσετε τη λανθασμένη εκτύπωση εγγράφων του Microsoft Word

Πώς να διορθώσετε τη λανθασμένη εκτύπωση εγγράφων του Microsoft Word

Τρόπος διόρθωσης σφαλμάτων κατά την εκτύπωση λανθασμένων εγγράφων του Microsoft Word Τα σφάλματα στην εκτύπωση εγγράφων Word με αλλαγμένες γραμματοσειρές, ακατάστατες παραγράφους, κείμενο που λείπει ή χαμένο περιεχόμενο είναι αρκετά συνηθισμένα. Ωστόσο, μην το κάνετε

Διαγράψτε τα σχέδια με στυλό και επισημάνσεις στις διαφάνειες του PowerPoint σας

Διαγράψτε τα σχέδια με στυλό και επισημάνσεις στις διαφάνειες του PowerPoint σας

Εάν έχετε χρησιμοποιήσει το στυλό ή το highlighter για να σχεδιάσετε στις διαφάνειες του PowerPoint κατά τη διάρκεια μιας παρουσίασης, μπορείτε να αποθηκεύσετε τα σχέδια για την επόμενη παρουσίαση ή να τα σβήσετε, ώστε την επόμενη φορά που θα το δείξετε να ξεκινήσετε με καθαρές διαφάνειες PowerPoint. Ακολουθήστε αυτές τις οδηγίες για να διαγράψετε σχέδια με στυλό και επισημάνσεις: Σβήσιμο γραμμών μία στο […]

Περιεχόμενα της βιβλιοθήκης στυλ στο SharePoint 2010

Περιεχόμενα της βιβλιοθήκης στυλ στο SharePoint 2010

Η βιβλιοθήκη στυλ περιέχει αρχεία CSS, αρχεία επεκτάσιμης γλώσσας φύλλου στυλ (XSL) και εικόνες που χρησιμοποιούνται από προκαθορισμένες κύριες σελίδες, διατάξεις σελίδων και στοιχεία ελέγχου στο SharePoint 2010. Για να εντοπίσετε αρχεία CSS στη βιβλιοθήκη στυλ μιας τοποθεσίας δημοσίευσης: Επιλέξτε Ενέργειες τοποθεσίας→ Προβολή Όλο το περιεχόμενο του ιστότοπου. Εμφανίζεται το περιεχόμενο του ιστότοπου. Η βιβλιοθήκη Style βρίσκεται στο […]

Μορφοποίηση αριθμών σε χιλιάδες και εκατομμύρια σε αναφορές του Excel

Μορφοποίηση αριθμών σε χιλιάδες και εκατομμύρια σε αναφορές του Excel

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

Τρόπος κοινής χρήσης και παρακολούθησης τοποθεσιών του SharePoint

Τρόπος κοινής χρήσης και παρακολούθησης τοποθεσιών του SharePoint

Μάθετε πώς να χρησιμοποιείτε τα εργαλεία κοινωνικής δικτύωσης του SharePoints που επιτρέπουν σε άτομα και ομάδες να επικοινωνούν, να συνεργάζονται, να μοιράζονται και να συνδέονται.

Πώς να μετατρέψετε ημερομηνίες σε μορφές Julian στο Excel

Πώς να μετατρέψετε ημερομηνίες σε μορφές Julian στο Excel

Οι ημερομηνίες του Ιουλιανού χρησιμοποιούνται συχνά σε περιβάλλοντα παραγωγής ως χρονική σήμανση και γρήγορη αναφορά για έναν αριθμό παρτίδας. Αυτός ο τύπος κωδικοποίησης ημερομηνίας επιτρέπει στους λιανοπωλητές, τους καταναλωτές και τους αντιπροσώπους υπηρεσιών να προσδιορίσουν πότε κατασκευάστηκε ένα προϊόν και, επομένως, την ηλικία του προϊόντος. Οι ημερομηνίες του Ιουλιανού χρησιμοποιούνται επίσης στον προγραμματισμό, τον στρατό και την αστρονομία. Διαφορετικές […]

Πώς να δημιουργήσετε μια εφαρμογή Web Access

Πώς να δημιουργήσετε μια εφαρμογή Web Access

Μπορείτε να δημιουργήσετε μια εφαρμογή Ιστού στην Access 2016. Τι είναι λοιπόν μια εφαρμογή Ιστού; Λοιπόν, ο Ιστός σημαίνει ότι είναι διαδικτυακός και η εφαρμογή είναι απλώς συντομογραφία της «εφαρμογής». Μια προσαρμοσμένη εφαρμογή Ιστού είναι μια διαδικτυακή εφαρμογή βάσης δεδομένων στην οποία έχει πρόσβαση από το cloud χρησιμοποιώντας ένα πρόγραμμα περιήγησης. Δημιουργείτε και συντηρείτε την εφαρμογή Ιστού στην έκδοση για υπολογιστές […]

Γραμμή γρήγορης εκκίνησης στο SharePoint 2010

Γραμμή γρήγορης εκκίνησης στο SharePoint 2010

Οι περισσότερες σελίδες στο SharePoint 2010 εμφανίζουν μια λίστα με συνδέσμους πλοήγησης στη γραμμή γρήγορης εκκίνησης στην αριστερή πλευρά της σελίδας. Η γραμμή γρήγορης εκκίνησης εμφανίζει συνδέσμους προς επιλεγμένο περιεχόμενο ιστότοπου, όπως λίστες, βιβλιοθήκες, τοποθεσίες και σελίδες δημοσίευσης. Η γραμμή γρήγορης εκκίνησης περιλαμβάνει δύο πολύ σημαντικούς συνδέσμους: Σύνδεσμος όλου του περιεχομένου του ιστότοπου: Η […]

Τι σημαίνουν τα μηνύματα σφάλματος επίλυσης στο Excel;

Τι σημαίνουν τα μηνύματα σφάλματος επίλυσης στο Excel;

Για απλά προβλήματα, ο Επίλυση στο Excel συνήθως βρίσκει γρήγορα τις βέλτιστες τιμές μεταβλητής Επίλυσης για τη συνάρτηση αντικειμένου. Ωστόσο, σε ορισμένες περιπτώσεις, ο Επίλυση δυσκολεύεται να βρει τις τιμές της μεταβλητής Επίλυσης που βελτιστοποιούν τη συνάρτηση στόχου. Σε αυτές τις περιπτώσεις, ο Επίλυση εμφανίζει συνήθως ένα μήνυμα ή ένα μήνυμα σφάλματος που περιγράφει ή συζητά το πρόβλημα που […]