Αυτό το σεμινάριο θα δείξει πώς να δημιουργήσετε ένα αρχείο κειμένου με VBA.
Δημιουργήστε ένα αρχείο κειμένου
Αυτό το μάθημα χρησιμοποιεί το FileSystemObject. Για να το χρησιμοποιήσετε, θα χρειαστεί να ορίσετε μια αναφορά στη βιβλιοθήκη χρόνου εκτέλεσης σεναρίων VB.
Για να δημιουργήσετε ένα αρχείο κειμένου, μπορείτε να χρησιμοποιήσετε αυτόν τον κωδικό παρακάτω με Μέθοδος CreateTextFile.
12345678 | Υπο FSOCreateTextFile ()Dim FSO Ως αντικείμενοΟρισμός FSO = CreateObject ("Scripting.FileSystemObject")Dim TextFile ως αντικείμενοΟρισμός TextFile = FSO.CreateTextFile ("C: \ Test \ TestFile.txt")Τέλος υπο |
Μπορείτε να περάσετε προαιρετικά ορίσματα στη μέθοδο CreateTextFile:
- Εάν ορίσετε το όρισμα "αντικατάσταση" σε true, ένα ήδη υπάρχον αρχείο μπορεί επίσης να αντικατασταθεί.
- Εάν ορίσετε το όρισμα "unicode" αληθές, δημιουργείται ένα αρχείο unicode, διαφορετικά (ή εάν το όρισμα παραλειφθεί) το αποτέλεσμα θα είναι ένα αρχείο ASCII.
Στο ακόλουθο παράδειγμα, ένα υπάρχον TestFile.txt θα αντικατασταθεί με ένα αρχείο unicode:
1 | Ορισμός TextFile = FSO.CreateTextFile ("C: \ Test \ TestFile.txt", True, True) |
Γράψιμο σε αρχείο κειμένου
Αφού δημιουργήσετε ένα αρχείο κειμένου, μπορείτε να γράψετε κείμενο στο αρχείο χρησιμοποιώντας μια μόνο γραμμή κώδικα:
1 | TextFile.Write "content" |
Κάντε κλικ στο σύνδεσμο για να μάθετε περισσότερα σχετικά με τη γραφή σε αρχεία κειμένου χρησιμοποιώντας τις μεθόδους Write, WriteLine, WriteBlankLines.