is there a command to change the codename of a sheet?
tried worksheets("Sheet1").codename = "test"
but i think the codename only retrieves values, it doesn't set them.
--
Gary
is there a command to change the codename of a sheet?
tried worksheets("Sheet1").codename = "test"
but i think the codename only retrieves values, it doesn't set them.
--
Gary
Maybe...
ThisWorkbook.VBProject.VBComponents("Sheet1").Name = "NewCodeName"
if you don't know the original codename:
dim wks as worksheet
set wks = activesheet
ThisWorkbook.VBProject.VBComponents(wks.codename).Name = "NewCodeName"
Gary Keramidas wrote:
>
> is there a command to change the codename of a sheet?
>
> tried worksheets("Sheet1").codename = "test"
>
> but i think the codename only retrieves values, it doesn't set them.
>
> --
>
> Gary
--
Dave Peterson
With ActiveSheet
.Parent.VBProject.VBComponents(.CodeName) _
.Properties("_CodeName") = "somevalue"
End With
--
HTH
Bob Phillips
(remove nothere from email address if mailing direct)
"Gary Keramidas" <GKeramidasATmsn.com> wrote in message
news:OfxG4O%[email protected]...
> is there a command to change the codename of a sheet?
>
> tried worksheets("Sheet1").codename = "test"
>
> but i think the codename only retrieves values, it doesn't set them.
>
> --
>
>
> Gary
>
>
>
thanks, dave, needed the 2nd example because i was inserting a sheet and have no
idea what name excel is assigning to it. i only have 20 sheets, but probably
because of manipulating things excel was give codenames in the 30's.
--
Gary
"Dave Peterson" <[email protected]> wrote in message
news:[email protected]...
> Maybe...
>
> ThisWorkbook.VBProject.VBComponents("Sheet1").Name = "NewCodeName"
>
> if you don't know the original codename:
>
> dim wks as worksheet
> set wks = activesheet
> ThisWorkbook.VBProject.VBComponents(wks.codename).Name = "NewCodeName"
>
> Gary Keramidas wrote:
>>
>> is there a command to change the codename of a sheet?
>>
>> tried worksheets("Sheet1").codename = "test"
>>
>> but i think the codename only retrieves values, it doesn't set them.
>>
>> --
>>
>> Gary
>
> --
>
> Dave Peterson
thanks bob, i'll give it a try
--
Gary
"Bob Phillips" <[email protected]> wrote in message
news:uKcNAX%[email protected]...
> With ActiveSheet
> .Parent.VBProject.VBComponents(.CodeName) _
> .Properties("_CodeName") = "somevalue"
> End With
>
>
>
> --
> HTH
>
> Bob Phillips
>
> (remove nothere from email address if mailing direct)
>
> "Gary Keramidas" <GKeramidasATmsn.com> wrote in message
> news:OfxG4O%[email protected]...
>> is there a command to change the codename of a sheet?
>>
>> tried worksheets("Sheet1").codename = "test"
>>
>> but i think the codename only retrieves values, it doesn't set them.
>>
>> --
>>
>>
>> Gary
>>
>>
>>
>
>
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks