Try this

/code
Sub SaveAsCSV()
FullFileName = Application.GetSaveAsFilename("", "CSV (Comma
delimited)(*.csv),*.csv", 1, "Save As *.csv")
If FullFileName < "False" Then
ActiveWorkbook.SaveAs Filename:=FullFileName, FileFormat:=xlCSV
End If
End Sub
/code

Craig

"BrianH" wrote in message
...
Clicking Save As in Excel 2002 does not give me the option to save as CSV
so
I guess I have to download that ability but I can't find it.

Basically I want to convert a column of words in Excel to a text list with
commas in between without tabs or paragraphs.

Thanks,
BrianH