Trying to get rid of leading apostrophes in text cells

Originally Posted by aelgadi

The trick is to use the ".ClearFormat" for entire sheet as follows

Public Sub Remove_Apostrophe()
    Sheet1.Cells.ClearFormats
End Sub

or for a range as follows

Public Sub Remove_Apostrophe()
    Dim sRange As Range
    ' you need to define the range first  i.e set sRange = .....
    sRange.Cells.ClearFormats
End Sub

That did it! RESOLVED!!
Thank you!