Metin Dosyası Oluştur - Microsoft Excel

Verilen tam yol üzerinde metin dosyası oluşturmaya yarayan VBA kodudur.

Option Explicit

Sub MetinDosyasiOlustur()
    Dim fso          As Object
    Dim metinDosyasi As Object
    Dim tamYol       As String
    
    tamYol = "D:\Deneme.txt"
    
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set metinDosyasi = fso.CreateTextFile(tamYol, True, True)
End Sub