Leading Apostrophe

[smayr]

Yes but like everyone else I got the leading apostrophe. I guess I should
export as the CVS files and then save as an xls. file.

Or has anyone come up with a way to get rid of the apostrophe?

 

[Gary''s Student]

Try this small macro:

Sub tic_killer()
Set rr = ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants, xlTextValues)
For Each r In rr
If r.PrefixCharacter = "'" Then
r.Value = r.Value
End If
Next
End Sub

 

[smayr]

I got an error message saying the syntac was incorrect and that the security
level was set to low to run the macro.

 

[Ashish Mathur]

Hi,

What you can alternatively do is that type a number 1 in any cell and then
copy this number. Now select the range and then Edit > Paste Special >
Multiply.

--
Regards,

Ashsih Mathur
Microsoft Excel MVP
www.ashishmathur.com