Delete all modules in an Excel file at the same time Free Excel Macros (VBA) | Excel Programs

Copy Macro

'For online Excel courses click: https://www.excelsizeyeter.com/excelwithkenan.com/udemy_giris.php 
Function bRemoveAllCode(ByVal szBook As String) As Boolean
Const lModule As Long = 1
Const lOther As Long = 100
Dim objCode As Object
Dim objComponents As Object
Dim wkbBook As Workbook
42
On Error GoTo bRemoveAllCodeError
'set workbook and components based on the workbook name passed to
'this function
Set wkbBook = Workbooks(szBook)
Set objComponents = wkbBook.VBProject.VBComponents
'Remove all modules & code
For Each objCode In objComponents
If objCode.Type = lModule Then
'if the type is a module, delete the module
objComponents.Remove objCode
ElseIf objCode.Type = lOther Then
'if the type is a code module, remove the lines
objCode.CodeModule.DeleteLines 1, _
objCode.CodeModule.CountOfLines
End If
Next objCode
'if no error occurs, set function value to true and exit
bRemoveAllCode = True
Exit Function
bRemoveAllCodeError:
'if an error occurs set function value to false and exit
bRemoveAllCode = False
End Function

No	Macro Name
1	Delete all modules in an Excel file at the same time
2	excel operators hk
3	add time as menu (most reliable)
4	Add menu to file edit bar delete
5	calculator on / off
6	delete duplicate / duplicate rows
7	show file path list in detail fields of files file path etcâ € ¦
8	browse folder xls list
9	Calculate the duration of the mp3 file (type the file path and select that cell)
10	add time as menu
11	excellent menu insert file menu print print preview sheet / page structure remains
12	deleting the menu bar and creating a custom menu
13	deleting all the codes we have written in the excel file
14	Deleting all names given using name manager
15	specify partition, list how many files you have
16	starry effects
17	add a picture to the description
18	find-delete-change-save codes2
19	creates a copy of the book by deleting userformmodulclass
20	delete every 5 min without warning if there is data between a1: a3000

Excel Free Macros (VBA)

Delete All Modules İn An Excel File At The Same Time

Online Excel Courses

Services

How can we help you?

Subscribe to our Youtube Channel?

Keywords