Remove VBA code

M

Michi

Hi!
I have removed the VBA code from the workbook "Test.xls", saved and
closed. When I reopened the workbook the message "Workbook countains
macros" popped up.
I saved the workbook and reopened it again and to my surprise no macro
warning occurred. Can anyone explain that to me?

For vba code deleting I used the macro of www.cpearson.com. See the
vba code below:

Public Sub test()
ThisWorkbook.SaveAs ("Test1")
DeleteAllVBA
ThisWorkbook.Save
End Sub
Sub DeleteAllVBA()

Dim VBComp As VBIDE.VBComponent
Dim VBComps As VBIDE.VBComponents

Set VBComps = ActiveWorkbook.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

End Sub

Thanks for your help
Michi
 
D

Don Guillett

You must also "remove" the macro module> goto vbe by alt f11>right click on
the module>remove>NO
 
M

Michaela Sulzbacher

I guess you have not tried out the code I provided, because the modules
are also removed automatically.

Michi

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!
 

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

Delete VB issue 3
Run time Error 13 Type Mismatch Excel 97 2
Removing Objects 1
User Defined type not defined 1
excel macros "persisting" 2
Executing macro in one book from another. 3
Delete all Macros Error 4
Deleting code from a macro (by a macro) 2

Top