2016-11-09 10 views
0

현재 VBS 파일에서 Visio를 열고 작업을 수행합니다. 그러나 매크로가 끝날 때마다 Visio.exe 여전히 작업 관리자에서 '활성 프로세스'남아 있습니다.VBS 파일에서 Visio 닫기

문제는 매크로를 여러 번 실행하면 여러 개의 Visio.exe가 바로 그곳에있는 것입니다.

효과적으로 Visio 파일을 닫을 수 있습니까? (따라서 프로세스가 종료됩니다)? 의도 한대로

Sub MacroExample() 

    Dim AppVisio 
    Set AppVisio = CreateObject("visio.InvisibleApp") 
    Dim vsoDoc 

    Set vsoDoc = AppVisio.Documents.Open("filepath\file.vsd") 

    vsoDoc.ExecuteLine ("MacroName") 
    Set vsoDoc = Nothing 
    set AppVisio = nothing 
    vsoDoc.close 
    appvisio.quit 
End Sub 

이 2 개 라인이 작동하지 않습니다 : 여기에

내 코드?

올바른 방향으로 어떤 도움/포인터

vsoDoc.close 
    appvisio.quit 
가 감사 (내 인터넷 검색에 내가 유사한 코드에 대한 모든 이야기 건너 온 한 문서를 기준으로합니다. 나는이 둘은 프로세스를 종료 것이라고 생각)! (여기에 모든 코드를 참고 및 Visio 내부에서 의도 한대로 작동)

+1

내가 .Quit' 호출'은'.Close'을 유지하고 줄의 코드로 정리되어 있지만, 경우에 대비하여'Set appVisio = Nothing'을 끝에 추가해보십시오. –

+0

코드 재정렬! 고마워요 !! – Dingo

답변

0

을이 질문에 대한 답은

vsoDoc.close 
appvisio.quit 

'put this at the end instead of beginning 
Set vsoDoc = Nothing 
set AppVisio = nothing 
관련 문제