Dim DosyaKonumu As String
DosyaKonumu = CurrentProject.Path & "\ToTxt.txt"
DoCmd.TransferText acImportDelim, "txtverial", "Table1", DosyaKonumu
koddaki "txtverial" ibaresi, Metin Dosyasından Dış Veri Al işleminde Farklı kaydedilen Belirtimin adıdır.
İnceleyip olumlu/olumsuz bildirimde bulununuz.