ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Enable/Disable macros (https://www.excelbanter.com/excel-discussion-misc-queries/17174-enable-disable-macros.html)

Adam

Enable/Disable macros
 
My file still asks if I want to enable or disable macros even though I have
deleted all macros.
Any Ideas?
/Adam


Hi Adam,

the reason for this is that although the macros have been
deleted a module folder still exists. In the VB editor
you will see a module folder. Expand this, then right
click on the module shown (probably 'Module1') and
choose 'Remove..'. Click 'No' in the next dialog and
Save. You won't see the macro dialog when you re-open the
file.

Regards,

TonyM
-----Original Message-----
My file still asks if I want to enable or disable macros

even though I have
deleted all macros.
Any Ideas?
/Adam
.


Bob Phillips

Adam,

You could run this code on the workbook

Dim vbMod As Object

For Each vbMod In ActiveWorkbook.VBProject.VBComponents
Select Case vbMod.Type
Case 1, 2, 3: 'module, class, userform
ThisWorkbook.VBProject.VBComponents.remove vbMod
Case Else 'ThisWorkbook, sheet modules
With vbMod.CodeModule
.DeleteLines 1, .CountOfLines
End With
End Select
Next vbMod

Make sure that you don't leave it in the workbook though :-)

--

HTH

RP
(remove nothere from the email address if mailing direct)


wrote in message
...
Hi Adam,

the reason for this is that although the macros have been
deleted a module folder still exists. In the VB editor
you will see a module folder. Expand this, then right
click on the module shown (probably 'Module1') and
choose 'Remove..'. Click 'No' in the next dialog and
Save. You won't see the macro dialog when you re-open the
file.

Regards,

TonyM
-----Original Message-----
My file still asks if I want to enable or disable macros

even though I have
deleted all macros.
Any Ideas?
/Adam
.





All times are GMT +1. The time now is 09:46 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com