.CSV format problem

Hi - I need to save an Excel spreadsheet in .csv format so that when its opened in Notepad the fields appear with "Quotation Marks" around the data.

Like this:

"H","203107/X5269243","Amazon .co.uk"," ","Phace Two","Kingston Park","Flaxley Road","Peterborough Cambridge","PE2 9EN"," "," "," "," "," "," ",
"D",6.00,"SB2601",
"D",6.00,"10021J",
"D",6.00,"NSERUM",

It's for orders that my warehouse need to import into their system and I can't seem to get the "Quotation Marks" around the data. Even the fields with no data require empty quotation marks.

Can you anyone help!

Many thanks,

Graham

Thanks for the welcome and the assistance!

Please see a sample file enclosed.

Graham...Not sure if this will do it. It works for me in certain cases. Try formatting your cells with Custom \"@\" Once you have done that you should be able to type text into these cells and the quotation marks will be included.

Graham. Looks like this format can be used. After you have populated the sheet, you will need to run a macro like shown below to help replace the triple quotation marks with the single ones.
Sub SaveAsCSV()

Dim SrcRg As Range
Dim CurrRow As Range
Dim CurrCell As Range
Dim CurrTextStr As String
Dim ListSep As String
Dim FName As Variant
FName = Application.GetSaveAsFilename("", "CSV File (*.csv), *.csv")

If FName <> False Then
ListSep = Application.International(xlListSeparator)
If Selection.Cells.Count > 1 Then
Set SrcRg = Selection
Else
Set SrcRg = ActiveSheet.UsedRange
End If
Open FName For Output As #1
For Each CurrRow In SrcRg.Rows
CurrTextStr = ""
For Each CurrCell In CurrRow.Cells
CurrTextStr = CurrTextStr & """" & CurrCell.Value & """" & ListSep
Next
While Right(CurrTextStr, 1) = ListSep
CurrTextStr = Left(CurrTextStr, Len(CurrTextStr) - 1)
Wend
Print #1, CurrTextStr
Next
Close #1
End If
End Sub

If you are needing quotation marks around numbers for some fields, then use a format for those columns like \"###.###\" or \"##.##\"

Thanks guys - how do I insert this format into the columns? Sorry, really basic knowledge of Excel!

Your welcome...please select the column or range of cells and then use the custom format option in Excel... Please refer to your many resources online for custom Excel formatting...http://www.ozgrid.com/Excel/excel-cu...er-formats.htm

Still can't get it to work. I custom format the cells in the spreadsheet, save as a csv, but still no. When viewed in notepad I don't see the quotation marks...

Would you be able to upload your most recent sample file containing the no critical data?

Latest excel file and csv file enclosed. Perhaps its the way I am saving the excel file?

Please see the attached files

You will need to run the macro in the QuoteFormat file to create the .csv file. Once you have the .csv file, make a copy of it and see if you can rename the file extension from .csv to .txt and view it the text file in notepad or another text editor app.

How do I 'Run the Macro' in the QuoteFormat file?

Please see the following links for macro instructions for Excel 2003:

http://office.microsoft.com/en-us/ex...005202306.aspx

http://office.microsoft.com/en-us/ex...001119579.aspx

You should be able to see the macro named SaveAsCSV, select it, and run it.

Requiring "quotes" in the file vs a simple comma delimited line seems odd. By chance, have you tried having a plain comma limited file (.csv) uploaded to your system?

Just a quick thank you - this is now working and my warehouse are importing my orders directly - thank you very much!

Graham