İçindekiler
Bu öğretici, VBA ile bir metin dosyasının nasıl oluşturulacağını gösterecektir.
Metin Dosyası Oluştur
Bu ders FileSystemObject'i kullanır. Kullanmak için, VB komut dosyası çalışma zamanı kitaplığına bir referans ayarlamanız gerekecek.
Bir metin dosyası oluşturmak için aşağıdaki kodu aşağıdakilerle birlikte kullanabilirsiniz. CreateTextFile Yöntemi.
12345678 | Alt FSOCreateTextFile()Nesne Olarak FSO'yu KarartFSO'yu ayarla = CreateObject("Scripting.FileSystemObject")Dim TextFile As ObjectTextFile = FSO.CreateTextFile("C:\Test\TestFile.txt") olarak ayarlayınAlt Bitiş |
İsteğe bağlı bağımsız değişkenleri CreateTextFile yöntemine iletebilirsiniz:
- "Üzerine yaz" argümanını true olarak ayarlarsanız, zaten var olan bir dosyanın üzerine de yazılabilir.
- "unicode" argümanı doğru olarak ayarlanırsa, bir unicode dosyası oluşturulur, aksi takdirde (veya argüman atlanırsa) sonuç bir ASCII dosyası olur.
Aşağıdaki örnekte, mevcut bir TestFile.txt dosyasının üzerine bir unicode dosyası yazılacaktır:
1 | Set TextFile = FSO.CreateTextFile("C:\Test\TestFile.txt", True, True) |
Metin Dosyasına Yazma
Bir metin dosyası oluşturduktan sonra, tek bir kod satırı kullanarak dosyaya metin yazabilirsiniz:
1 | TextFile.Write "içerik" |
Write, WriteLine, WriteBlankLines yöntemlerini kullanarak metin dosyalarına yazma hakkında daha fazla bilgi edinmek için bağlantıya tıklayın.