Trong bài viết này, chúng tôi sẽ tạo một macro để xóa mô-đun khỏi sổ làm việc.

Chúng tôi sẽ sử dụng MainModule làm mô-đun thô.

ArrowMainModule

Chúng tôi muốn loại bỏ MainModule này.

Bấm vào nút này cho cùng.

ArrowMain

ArrowOutput

Giải thích logic

Trong bài viết này, chúng tôi đã tạo hai macro, DeleteVBComponent và call_procedure.

DeleteVBComponent

Nó lấy tên sổ làm việc và tên mô-đun làm đầu vào, và xóa mô-đun khỏi sổ làm việc.

call_procedure

Nó được sử dụng để gọi macro DeleteVBComponent với sổ làm việc đang hoạt động và MainModule làm đầu vào.

Giải thích mã

Application.DisplayAlerts = False Mã này được sử dụng để tắt thông báo cảnh báo.

wb.VBProject.VBComponents.Remove wb.VBProject.VBComponents (CompName)

Mã này được sử dụng để xóa mô-đun khỏi sổ làm việc.

Application.DisplayAlerts = True Mã này được sử dụng để kích hoạt thông báo cảnh báo.

Vui lòng theo dõi bên dưới để biết mã

Option Explicit

Sub DeleteVBComponent(ByVal wb As Workbook, ByVal CompName As String)

'Disabling the alert message

Application.DisplayAlerts = False

'Ignore errors

On Error Resume Next

'Delete the component

wb.VBProject.VBComponents.Remove wb.VBProject.VBComponents(CompName)

On Error GoTo 0

'Enabling the alert message

Application.DisplayAlerts = True

End Sub

Sub calling_procedure()

'Calling DeleteVBComponent macro

DeleteVBComponent ActiveWorkbook, "MainModule"



End Sub

Nếu bạn thích blog này, hãy chia sẻ nó với bạn bè của bạn trên Facebook và Facebook.

Chúng tôi rất muốn nghe ý kiến ​​từ bạn, hãy cho chúng tôi biết cách chúng tôi có thể cải thiện công việc của mình và làm cho nó tốt hơn cho bạn. Viết thư cho chúng tôi [email protected]