Delete Modules in Macro

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

The macro recorder does not record the mouse clicks to Delete a Module.

How can I delete modules via a macro?

Thanks,
Mark
 
Mark,

Here is an example for Module2

Dim VBComp As Object

Set VBComp = ThisWorkbook.VBProject.vbcomponents("Module2")
ThisWorkbook.VBProject.vbcomponents.Remove VBComp

--

HTH

RP
(remove nothere from the email address if mailing direct)
 
I'd like to remove all the modules in a workbook.

Would you have some sample code to iterate through the modules within a
workbook?

Thank you - your posts are very helpful.

Mark
 
Mark,

This will remove all modules. You cannot remove Sheet or Thisworkbook
modules.

Dim VBComp As Object
Dim vbMod As Object

For Each vbMod In ThisWorkbook.VBProject.vbcomponents
If vbMod.Type = 1 Then ' a module
ThisWorkbook.VBProject.vbcomponents.remove vbMod
End If
Next vbMod


--

HTH

RP
(remove nothere from the email address if mailing direct)
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Excel 2003 - VBA to get a list of Module names in the project 4
How to call module function or sub from the Add In? 3
Programatically changing the macro content. 1
When something in module is shown as a macro 3
Skip Run macro if module has been deleted 1
Macro Recorder 12
OnTime Change_Event macro AND copy to sheet2 macro trouble 7
Run Macro If Cell have "x" value 0

Back
Top