Προγραμματισμός

* Γνώση Υπολογιστών >> Προγραμματισμός >> Visual Βασικά Προγραμματισμός

Πώς να ψάξει για ένα αρχείο χρησιμοποιώντας μια μακρο

Γνωρίζοντας πώς να αναζητήσετε ένα αρχείο χρησιμοποιώντας μια μακροεντολή μπορεί να κάνει την εφαρμογή λογιστικών φύλλων σας πιο δυναμική . Microsoft Office Excel είναι μια εφαρμογή λογιστικών φύλλων που συνήθως χρησιμοποιείται για την ανάλυση μεγάλου όγκου δεδομένων . Συχνά οι προγραμματιστές τρέχουν στην ανάγκη να ψάξει για ένα συγκεκριμένο αρχείο στον υπολογιστή τους . Η δημιουργία μιας μακροεντολής είναι ο καλύτερος τρόπος για να επιτευχθεί αυτό το έργο . Visual Basic for Applications ( VBA ) σας παρέχει την ευελιξία αυτή. VBA είναι μια γλώσσα προγραμματισμού ηλεκτρονικών υπολογιστών που χρησιμοποιούνται για την αυτοματοποίηση εργασιών στο Excel . Τα πράγματα που θα χρειαστείτε για Microsoft Office Excel
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Εκκίνηση του Microsoft Office Excel , στη συνέχεια, κάντε κλικ στην καρτέλα "Προγραμματιστής " . Κάντε κλικ στο " Μακροεντολές " στη συνέχεια, πληκτρολογήστε " searchFile " υπό τον τίτλο " Macro name: " . Κάντε κλικ στο κουμπί "Δημιουργία " για να ανοίξετε το Microsoft Visual Basic παράθυρο 2

Πληκτρολογήστε τα ακόλουθα στο " searchFile " να δηλώσει τα ονόματα των μεταβλητών σας : .

Δημ. filePath Όπως String

Dim currentFile Όπως String Dim

xCntr As Integer
εικόνων 3

Πληκτρολογήστε το παρακάτω για να ορίσετε τη μεταβλητή που θα χρησιμοποιήσετε για να αναζητήσετε αρχεία κειμένου :

filePath = " C : \\. * txt "

Επεξεργασία " C : \\. * txt " και πληκτρολογήστε μια διαφορετική διαδρομή και την επέκταση για να αναζητήσετε άλλα αρχεία
Η 4

Πληκτρολογήστε το . παρακάτω, για να πάρει το πρώτο αρχείο που βρέθηκαν στη διαδρομή :

currentFile = Dir ( filePath )
5

Πληκτρολογήστε το παρακάτω, για να βρόχο μέσω όλων των αρχείων και εμφανίζει ένα πλαίσιο μηνύματος , όταν η " myfile.txt " το αρχείο βρίσκεται :

Do While currentFile <> " "

xCntr = xCntr + 1

Εάν currentFile = " myfile.txt "Τότε

MsgBox " Βρέθηκε το αρχείο ! "

End If

currentFile = Dir

Loop
Η 6

Κάντε κλικ στο " Microsoft Excel " παράθυρο , στη συνέχεια, επιλέξτε " Μακροεντολές ". Κάντε κλικ στο " searchFile " και στη συνέχεια επιλέξτε "Run " για να εκτελέσετε τη μακροεντολή σας και να βρείτε το αρχείο .
Η
εικόνων

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα