Charlotte...Use "name" instead of "codename"...Ron

ActiveWorkbook.Worksheets.Add
WS_CodeName = ActiveSheet.Name

ron explained on 3/9/2011 :
Charlotte...Use "name" instead of "codename"...Ron

ActiveWorkbook.Worksheets.Add
WS_CodeName = ActiveSheet.Name

The value held in the CodeName property is not necessarily going to be
the same as the value held in the Name property for any given
worksheet. Since both props are read/write we can make them whatever we
want OR use a known CodeName (NOT editable via the UI) to get a
sheetname which IS editable via the UI and so may have been changed by
user.

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc