Зміст
Цей підручник покаже, як створити текстовий файл за допомогою VBA.
Створіть текстовий файл
У цьому уроці використовується FileSystemObject. Щоб його використати, вам потрібно буде встановити посилання на бібліотеку виконання сценарію VB.
Щоб створити текстовий файл, ви можете використовувати цей код нижче з Метод CreateTextFile.
12345678 | Sub FSOCreateTextFile ()Dim FSO As ObjectВстановити FSO = CreateObject ("Scripting.FileSystemObject")Затемнити текстовий файл як об’єктВстановити TextFile = FSO.CreateTextFile ("C: \ Test \ TestFile.txt")End Sub |
Ви можете передати додаткові аргументи методу CreateTextFile:
- Якщо ви встановите для аргументу “перезапис” значення true, вже існуючий файл також можна перезаписати.
- Встановивши для аргументу “unicode” значення true, буде створено файл unicode, інакше (або якщо аргумент опущено) результатом буде файл ASCII.
У наведеному нижче прикладі існуючий TestFile.txt буде перезаписаний файлом unicode:
1 | Встановити TextFile = FSO.CreateTextFile ("C: \ Test \ TestFile.txt", True, True) |
Запис у текстовий файл
Після створення текстового файлу ви можете записати текст у файл, використовуючи один рядок коду:
1 | TextFile.Write "content" |
Натисніть на посилання, щоб дізнатися більше про запис у текстові файли за допомогою методів Write, WriteLine, WriteBlankLines.