This will save your active book as a csv file
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs FileName:= _
"D:\My Documents\Book1.csv", FileFormat:= _
xlCSV, CreateBackup:=False
Application.DisplayAlerts = Tru
--
Message posted from
http://www.ExcelForum.com