runtime error '1004'

A few weeks ago I found some code from this discussion group that allowed me
to delete all of the code modules from a workbook:

Set VBComps = NewBook.VBProject.VBComponents
For Each VBComp In VBComps
Select Case VBComp.Type
Case vbext_ct_StdModule, vbext_ct_MSForm, _
vbext_ct_ClassModule
VBComps.Remove VBComp
Case Else
With VBComp.CodeModule
.DeleteLines 1, .CountOfLines
End With
End Select
Next VBComp

It worked like a charm. Yesterday I got a new computer at work running XP
and Excel 2003. Now I'm getting this error message:
runtime error '1004' Programmatic access to Visual Basic Project is not
trusted.

I have my security settings on low. Any ideas of how I can make this work
again?

There's a setting that was added in xl2002 (IIRC). It allows the user to have
more control over the stuff that they run.

Tools|macro|security|trusted publishers tab
check that "trust access to Visual Basic Project"

This is user by user setting. It doesn't travel with the workbook.

Steve wrote:
>
> A few weeks ago I found some code from this discussion group that allowed me
> to delete all of the code modules from a workbook:
>
> Set VBComps = NewBook.VBProject.VBComponents
> For Each VBComp In VBComps
> Select Case VBComp.Type
> Case vbext_ct_StdModule, vbext_ct_MSForm, _
> vbext_ct_ClassModule
> VBComps.Remove VBComp
> Case Else
> With VBComp.CodeModule
> .DeleteLines 1, .CountOfLines
> End With
> End Select
> Next VBComp
>
> It worked like a charm. Yesterday I got a new computer at work running XP
> and Excel 2003. Now I'm getting this error message:
> runtime error '1004' Programmatic access to Visual Basic Project is not
> trusted.
>
> I have my security settings on low. Any ideas of how I can make this work
> again?

--

Dave Peterson