Spisie treści
Ten samouczek pokaże, jak utworzyć plik tekstowy za pomocą VBA.
Utwórz plik tekstowy
Ta lekcja wykorzystuje obiekt FileSystemObject. Aby z niego skorzystać, będziesz musiał ustawić odwołanie do biblioteki wykonawczej skryptu VB.
Aby utworzyć plik tekstowy, możesz użyć poniższego kodu z Metoda tworzenia pliku tekstowego.
12345678 | Sub FSOCreateTextFile()Dim FSO jako obiektUstaw FSO = CreateObject("Scripting.FileSystemObject")Przyciemnij plik tekstowy jako obiektUstaw plik tekstowy = FSO.CreateTextFile("C:\Test\TestFile.txt")Napis końcowy |
Do metody CreateTextFile możesz przekazać opcjonalne argumenty:
- Jeśli ustawisz argument „overwrite” na true, już istniejący plik może zostać nadpisany.
- Ustawiając argument „unicode” na true, tworzony jest plik unicode, w przeciwnym razie (lub jeśli argument zostanie pominięty) wynikiem będzie plik ASCII.
W poniższym przykładzie istniejący plik TestFile.txt zostanie nadpisany plikiem Unicode:
1 | Ustaw plik tekstowy = FSO.CreateTextFile("C:\Test\TestFile.txt", prawda, prawda) |
Zapisywanie do pliku tekstowego
Po utworzeniu pliku tekstowego możesz wpisać tekst do pliku za pomocą jednej linii kodu:
1 | TextFile.Write "treść" |
Kliknij łącze, aby dowiedzieć się więcej o zapisie do plików tekstowych przy użyciu metod Write, WriteLine, WriteBlankLines.