Hi

That's what the code does.

Paste the code in a standard module and pass the parameters.

Code:
Sub ConvertRangeIntoTextFile(ByRef RangeToConvert, ByVal FileName As String, _
                            Optional FilePath As String, Optional Delim As String = vbTab)
where pass the range,filename and optional filepath as well as the delimiter. That's all.