You can try out the below macro. If you are new to macros..

--Set the Security level to low/medium in (Tools|Macro|Security).
--From workbook launch VBE using short-key Alt+F11.
--From menu 'Insert' a module and paste the below code.
--Get back to Workbook.
--Run macro from Tools|Macro|Run <selected macro()


Sub SaveAsDelimitedFile()
Dim intFile As Integer, strData As String, rngRow As Range
Dim strFile As String

intFile = FreeFile
strFile = "c:\test.txt"

Open strFile For Output As #intFile
For Each rngRow In ActiveSheet.UsedRange.Rows
strData = Join(WorksheetFunction.Transpose( _
WorksheetFunction.Transpose(rngRow)), "|")
Print #intFile, strData
Next
Close #intFile

End Sub

If this post helps click Yes
---------------
Jacob Skaria


"GF08" wrote:

I need to create a flat file in Excel using the pipe delimiter | as element,
and carriage return line feed as line delimiter.

How do I do this?