Removing modules and forms

[Daniel Bonallack]

I was given code some time ago for removing modules and forms from a file.
The code is shown below.

The weird thing is that this works fine on my machine, but not on any of my
colleagues. Can someone tell me why? Is there a setting I need to be aware
of?

On my colleagues' PCs, it gives an error on the first line.

Thanks
Daniel

Dim VBComp As Object
Dim vbMod As Object

For Each vbMod In ThisWorkbook.VBProject.VBComponents
ThisWorkbook.VBProject.VBComponents.Remove vbMod
Next vbMod

 

[Luke M]

Are all the same references (under tools) enabled for both machines?

 

[Daniel Bonallack]

Hi Luke,

Thanks for responding. Yes, we have the same references set

regards
Daniel

 

[JLGWhiz]

Be sure that "Microsoft Visual Basic for Applications Extesibility 5.3 is
checked in VBA Tools>References

 

[Daniel Bonallack]

Hi, yes, it was checked for all three of us.

However, I found the problem (sorry for wasting people's time). In Excel,
under Tools>Macro>Security>Trusted Sources, the checkbox "Trust Access to
Visual Basic Project" was checked for me, but not for my colleagues.

Thanks again
Daniel

 

[Peter T]

Surprised that's all it was, what about

If vbMod.Type <> 100 Then ' vbext_ct_ClassModule
' remove non book/sheet module
end if

Regards,
Peter T

 

[JLGWhiz]

I thought about that, but decided they surely must have that checked. Broke
my own rule of never assuming anything unless it is to assume that it is
wrong.