Obsah
Tento tutoriál předvede, jak pomocí VBA vytvořit textový soubor.
Vytvořte textový soubor
Tato lekce používá FileSystemObject. Abyste ji mohli použít, budete muset nastavit odkaz na knihovnu run-time skriptu VB.
Chcete -li vytvořit textový soubor, můžete tento kód použít níže s Metoda CreateTextFile.
| 12345678 | Sub FSOCreateTextFile ()Dim FSO jako objektNastavit FSO = CreateObject ("Scripting.FileSystemObject")Dim TextFile jako objektNastavit TextFile = FSO.CreateTextFile ("C: \ Test \ TestFile.txt")End Sub |
Metodě CreateTextFile můžete předat volitelné argumenty:
- Pokud nastavíte argument „přepsat“ na hodnotu true, lze přepsat také již existující soubor.
- Nastavením argumentu „unicode“ na hodnotu true se vytvoří soubor unicode, jinak (nebo pokud je argument vynechán) bude výsledkem soubor ASCII.
V následujícím příkladu bude existující TestFile.txt přepsán souborem unicode:
| 1 | Nastavit TextFile = FSO.CreateTextFile ("C: \ Test \ TestFile.txt", True, True) |
Zápis do textového souboru
Po vytvoření textového souboru můžete do souboru zapsat text pomocí jednoho řádku kódu:
| 1 | TextFile.Write "content" |
Kliknutím na odkaz se dozvíte více o psaní do textových souborů pomocí metod Write, WriteLine, WriteBlankLines.
