본문 바로가기
오피스 - VBA

[VBA] 아웃룩에서 엑셀 매크로 실행하기

by ☆ 2022. 1. 8.
반응형

 

엑셀 파일명 및 경로는 d:\test.xlsm 임.

 

Sub Outlook_Run_Excel_Macro()

    Dim appExcel As Excel.Application
    Dim wkb As Excel.Workbook

    Set appExcel = CreateObject("Excel.Application")
    appExcel.Workbooks.Open ("d:\test.xlsm")

    appExcel.Visible = True

    appExcel.Run "'test.xlsm'!프로시저"

    'appExcel.ActiveWorkbook.Close

    'appExcel.Quit

    Set appExcel = Nothing
    Set wkb = Nothing

End Sub
반응형

댓글