View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Gary''s Student Gary''s Student is offline
external usenet poster
 
Posts: 11,058
Default Leading Apostrophe

Try this small macro:

Sub tic_killer()
Set rr = ActiveSheet.UsedRange.SpecialCells(xlCellTypeConst ants, xlTextValues)
For Each r In rr
If r.PrefixCharacter = "'" Then
r.Value = r.Value
End If
Next
End Sub
--
Gary''s Student - gsnu200803


" wrote:

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?