안녕하세요?

엑셀대단해님의 "간단한것"의 정의가 궁금하네요..

저에게는 어떠한 질문도 간단한게 없습니다.

회원님들이 이해할 수 있도록 설명하는게 어렵기 때문이죠.

모듈은 아래처럼 export시키시면 되구요..

Application.VBE.ActiveVBProject.VBComponents.Item("모듈명").Export ("D:\Documents\Excel\test.bas")

유저폼도 똑같은 방식으로 export시키시면 됩니다.
Application.VBE.ActiveVBProject.VBComponents.Item("유저폼이름").Export("D:\Documents\Excel\ufrm.frm")

다만.. 확장자에 주의를 해주세요..

    모듈은 .bas

    유저폼은 .frm

입니다.

여러개를 한번에 Export하려면 아래의 코드처럼 하면 되겠죠..

'### VBA 모듈 및 유저폼 등 컴포넌트 항목 화일로 내보내기
'### Created by abyul.com 2012.03.05 PM10:56
Sub testExportVBComponents()
    Dim i As Long, strExtension As String
    With Application.VBE.ActiveVBProject.VBComponents
        For i = 1 To .Count
            Select Case .Item(i).Type
                Case 100: strExtension = ".cls"
                Case 1: strExtension = ".bas"
                Case 3: strExtension = ".frm"
            End Select
            .Item(i).Export ("D:\Documents\Excel\" & .Item(i).Name & strExtension)
        Next i
    End With
End Sub

도움이 되셨기를..

요즘 바빠서 회답을 오래 못드렸네요. 이렇게 성심성의껏 대답해 주셨는데...

감사합니다. 

그리고 간단한게 아니네요. 제 말실수였습니다.

엑셀의 길은 멀고도 먼 것 같습니다.

열심히 하겠습니다.