|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
- 엑셀 버전(95,97,2000,xp,2003,2007): 2007
* 아래줄에 질문을 작성하세요 >>
아래와 같이 코드를 만들었는데 안돼서 문의 드립니다.
엑셀에서 VIEW.EXE 프로그램과 DDE 통신을 함에 있어 통신상태를 체크하는 것입니다.
Private Sub Workbook_Open()
Dim ChanNum As Long
ChanNum = Application.DDEInitiate("VIEW", "SYSTEM")
If ChanNum = 0 Then
MsgBox "DDE 통신이 끊어졌습니다.", vbCritical, "경고"
End If
Application.DDETerminate ChanNum
End Sub
위 내용을 This Workbok 에 삽입하면 엑셀파일 실행시에만 메시지가 출력되고 그 이후에는 실제 통신이 끊겨도 출력되지 않아요.
모듈내에 삽입하면 아예 반응이 없구요.
한단계씩 수동으로 실행하면 메시지가 뜨구요.
어디를 어떻게 수정해야 하는지 알려줄수 있나요?
|
|