excel - macro saving to txt, but with " " right now 1

[smooveb]

Hi everyone,

I've got a macro that is saving my one column spreadsheet in excel to a txt format for uploading into another application. The problem is that A is turning into "A" during the Save As Txt

Any ideas on how I can avoid this happening?

Thx!
Barrett

 

[CautionMP]

If your using the [tt]SaveAs()[/tt] method, change the format to [tt]xlUnicodeText[/tt].

Hope this helps,
CMP

(GMT-07:00) Mountain Time (US & Canada)

 

[smooveb]

thanks for the idea! unfortunately, it didn't work.

any other thoughts? appeciate it for sure!

Barrett

 

[CautionMP]

You could try the other text options to see if one of them will play nice.

I would just write my own routine to create the file, but I'm a programmer.

[navy]Sub [/navy] OutputFile()
[navy]Dim[/navy] wksSource [navy]As[/navy] Worksheet
[navy]Dim[/navy] lngRow [navy]As Long[/navy]
[navy]Dim[/navy] intFile [navy]As Integer[/navy]
Set wksSource = Worksheets("sheet1")
intFile = FreeFile
[navy]Open[/navy] "C:\Book1.txt" [navy]For Output As[/navy] #intFile
[navy]Do[/navy]
  lngRow = lngRow + 1
  Print #intFile, wksSource.Cells(lngRow, 1)
[navy]Loop Until[/navy] Trim(wksSource.Cells(lngRow, 1)) = ""
[navy]Close[/navy] #intFile
[navy]Set[/navy] wksSource = [navy]Nothing[/navy]
[navy]End Sub [/navy]

Hope this helps,
CMP

(GMT-07:00) Mountain Time (US & Canada)

 

[smooveb]

well heck, that was easy

thanks a lot CMP!!

Barrett