Πώς να διαβάσετε από ένα αρχείο κειμένου στο Excel VBA

Διαβάζοντας ένα αρχείο κειμένου είναι κάτι που ένας προγραμματιστής ηλεκτρονικών υπολογιστών πρέπει να γνωρίζουν πώς να το κάνουμε κατά την ανάπτυξη προγραμμάτων ηλεκτρονικών υπολογιστών . Στην VBA μπορείτε να χρησιμοποιήσετε τη δήλωση "Input # " για να ανοίξετε ένα αρχείο κειμένου και να διαβάσετε το περιεχόμενό της . Τα δεδομένα που διαβάζονται από το αρχείο είναι αποθηκευμένο στη μνήμη για να μπορείτε να χειριστείτε όπως εσείς επιθυμείτε . Χρησιμοποιώντας VBA να διαβάσει ένα αρχείο κειμένου είναι χρήσιμο όταν θέλετε να μεταφέρετε μεγάλες ποσότητες δεδομένων σε ένα υπολογιστικό φύλλο του Excel . Οδηγίες
Η

1 Κάντε κλικ στην καρτέλα "Προγραμματιστής " , κάντε κλικ στο " Visual Basic" και κάντε κλικ στο μενού "Εισαγωγή" . Επιλέξτε " Ενότητα " για να εισάγετε μια νέα λειτουργική μονάδα κώδικα 2

Ξεκινήστε με τη δημιουργία ενός υπο - διαδικασία χρησιμοποιώντας τον ακόλουθο κώδικα : .

Private Sub readTextFile ( )
Η Φτηνές 3

Δημιουργήστε τρεις μεταβλητές που θα χρησιμοποιήσετε για να διαβάσετε το αρχείο κειμένου :

Dim fileText Όπως String Dim

myTextFile Όπως String Dim

memFile As Integer
Φτηνές 4

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

myTextFile = " F : \\ Temp.txt "

memFile = FreeFile

5

Ανοίξτε το αρχείο , διαβάστε το περιεχόμενό του και κλείστε το αρχείο :

Open myTextFile Για Input Όπως # memFile

fileText = Input $ ( LOF ( 1 ) , 1 )

Κλείστε
Η 6

Εμφάνιση των αποτελεσμάτων αρχείο κειμένου μέσα από το παράθυρο άμεσης παρακολούθησης .

Debug.Print ( fileText )
Η 7

Τέλος η υπο - διαδικασία, πληκτρολογώντας " End Sub" ( χωρίς εισαγωγικά ) . Πατήστε F5 για να εκτελέσετε τη διαδικασία και να διαβάσετε το αρχείο .
Η
εικόνων