Cách đổi tên Module trong VBA excel

Mình đang tự học VBC excel, gặp một mắc là khi tạo module mà muốn đặt tên cho module đó khi xem lại cho dễ biết nội dung của module chạy vấn đề gì mà excel mặc định chỉ hiện số module ở phía sau nên mình chạy code để đổi tên module. code như sau:
'DOI TEN MODULE
Sub ReNameMod(Mod_Old_Name As String, Mod_New_Name As String)
On Error Resume Next
ThisWorkbook.VBProject.VBComponents(Mod_Old_Name).Name = Mod_New_Name
End Sub
Sub Test()
ReNameMod "Module2", "TV_MSGBOX"
End Sub
trong đó: Module2 là tên module mặc định của excel muốn đổi và TV_MSGBOX là tên sẽ được đổi thành. Đặt luôn đoạn code này vào module mà bạn muốn đổi nhé. Chúc thành công.

No comments :