Hi Dev,
One way it can be done, change the save as to suit your needs.
Regards
Pete

Sub TEXT1()
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Sheets("TEXT").Select
Sheets("TEXT").Copy
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Administrator\Desktop\MYTEXT.txt",
FileFormat:= _
xlUnicodeText, CreateBackup:=False
ActiveWindow.Close
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub






"devender_g" wrote in message
...

Dear All,

Is it possible to export excel data into Notepad?

Or is it possible to open a notepad file inside a macro and paste excel
contents into that file?

Any help will be appreciated..

Thanks
Dev


--
devender_g
------------------------------------------------------------------------
devender_g's Profile:
http://www.excelforum.com/member.php...o&userid=19379
View this thread: http://www.excelforum.com/showthread...hreadid=345778