Changeing codename of worksheet via VBComponents collection
Excel 2002 has a new macro security that you need to "approve" to perform
VBA manipulation of VBProject objects.
To set this,
choose Tools/Macro/Security from the Excel menu,
select the Trusted Sources tab
put a check in the checkbox called "Trust Access to Visual Basic Project".
--
HTH
Bob Phillips
"Arne" wrote in message
...
I wrote an add-in for Excel-2000 containing the following code
Dim wks As Worksheet
For Each wks In TheWorkbook.Worksheets
If (wks.Index 1) And (wks.Index < TheWorkbook.Worksheets.Count)
Then
TheWorkbook.VBProject.VBComponents(wks.CodeName).P roperties("_CodeName") =
_
"U" & wks.Index
End If
Next wks
This used to work. We have switched to Windows XP and Office 2003 (Small
business ed. SP2), and now I get an error (#1004), which reads (translated
from dutch): "Access to Visual Basic project at programming level
unreliable". Is it correct that access to this 'back door' to change the
worksheet code name has been changed in the transition to Excel 2003? Is
there a way to achieve the name change in another way?
|