Hi,

If I have a list of sheets codenames saved on a worksheet, how do convert
them back to sheets(shname)?

Here's one I've tried:

Dim SheetName As String
Dim shCodeName As String

shCodeName = MainPagepg.Range("BD" & Newrow - 1).Value

AfterShName = Replace(shCodeName.Name, "'", "''")
--
Thanks for your help.
Karen53