Microsoft Excel에서 VBA를 사용하여 파일에서 모듈에 내용을 추가

Posted on: 2020年11月12日 2020年11月12日
Tags: modules-class-modules-in-vba

전체 모듈을 추가하지 않으려면 아래 매크로를 사용하여 기존 모듈에 누락 된 프로 시저 만 추가 할 수 있습니다. 기존 모듈에 텍스트 파일의 내용을 추가합니다.

Sub ImportModuleCode(ByVal wb As Workbook, _

ByVal ModuleName As String, ByVal ImportFromFile As String)

' imports code to ModuleName in wb from a textfile named ImportFromFile

Dim VBCM As CodeModule

If Dir(ImportFromFile) = "" Then Exit Sub

On Error Resume Next

Set VBCM = wb.VBProject.VBComponents(ModuleName).CodeModule

If Not VBCM Is Nothing Then

VBCM.AddFromFile ImportFromFile

Set VBCM = Nothing

End If

On Error GoTo 0

End Sub

예 :

ImportModuleCode ActiveWorkbook, "TestModule", "C:\FolderName\NewCode.txt"