VBA to Print Excel Range to Notepad Help

[rollnation2]

Hello Power Users!

I want to create a macro to export a specific range, in a specific workbook to a .txt file. Then title the .txt file with a name from a cell within the workbook.

Data I want exported to notepad as text:
1.Range: B2:N34 ---> Sometimes this range will be larger, so I would like it to be dynamic, exporting everything in the range (no blanks).
2. I want the name of the .txt file to be what is in cell T2 of the same sheet.

Sheetname: "KTR ERP Upload FY22"

Image attached

Any help is appreciated!!

 

[rollnation2]

bump

 

[rollnation2]

I was able to get semi functional code working.
Need to refine the VBA to only print columns B:N, starting at row 2 through the end,

Here is the code that prints everything on the WS

Sub ExportText()

Open "h:\ERPUpload.txt" For Output As #1
With Sheets("KTR ERP Upload FY22")
iLastRow = .Range("b" & Rows.Count).End(xlUp).Row
iLastCol = .Cells(1, Columns.Count).End(xlToLeft).Column
For i = 1 To iLastRow
For j = 1 To iLastCol
If j <> iLastCol Then 'keep writing to same line
Print #1, .Cells(i, j),
Else 'end the line
Print #1, .Cells(i, j)
End If
Next j
Next i
End With
Close #1
Shell "notepad.exe ""h:\ERPupload.txt", vbNormalFocus

End Sub