How to use Visual Basic to generate .txt file

[LanaDallas]

Could you help me to create the .txt file from the Excel spreadsheet. What Visual Basic code would I use?

The correct format to use for the text file is:
Document Number + Tab Key + Amount (with a decimal point and no dollar sign) + Enter Key. Repeat for each request I need to process.

Text File Example:
X000X000000[Tab]1000.00[Enter]
X000X000000[Tab]1000.00[Enter]

 

[mikerickson]

This code will save the workbook as a tab delimited .txt file, change the file path as desired.

ActiveWorkbook.SaveAs Filename:= _
        "Macintosh HD:Users:michaelerickson:Desktop:Workbook1.txt", FileFormat:=xlText, CreateBackup:=False

or you could use

Application.Dialogs(xlDialogSaveAs).Show "test", 3

 

[TotallyConfused]

Hello Lana
WELCOME to the site. Here is my suggested way to write your data to a text file, though after seeing the amazing code that Mr. Rickson posted, I have no idea why anyone would use mine. I'm embarassed to even post it here.

Sub WriteToTextFile()
' This assumes the data starts in cell 'A2'
   Dim NumRows As Long
   Dim RowCounter As Long
NumRows = Range("A" & Rows.Count).End(xlUp).Row
Open "LanaDallas.Txt" For Output As [URL=https://www.mrexcel.com/forum/usertag.php?do=list&action=hash&hash=1]#1[/URL] 
    For RowCounter = 2 To NumRows
        Write [URL=https://www.mrexcel.com/forum/usertag.php?do=list&action=hash&hash=1]#1[/URL] , Cells(RowCounter, 1) & Chr$(9) & Cells(RowCounter, 2) & Chr$(27)
    Next RowCounter
Close [URL=https://www.mrexcel.com/forum/usertag.php?do=list&action=hash&hash=1]#1[/URL] 
End Sub

TotallyConfused