VBA Excel - 기존 Word 문서 파일을 열 수 없습니다.

Question

Excel을 사용하여 Word 문서를 여는 간단한 매크로가 있습니다. Word Object Library가 제대로 참조되었는지 확인했지만이 매크로를 실행하면 Documents.Open이 호출 된 후 정지되었습니다 (디버거에서 어디에서 오류가 발생했는지 알았을 때). 그것이 OLE 자동화 오류인지 모르겠지만 매크로가 멈추고 Excel을 닫아야합니다.

Public Const Dir = "C:/Temp/" 
Public Const File = "temp.docx" 

Public Sub OpenFile() 

Dim f As String: f = Dir & File 

Dim oWord As Object, oDoc As Object 
Set oWord = CreateObject("Word.Application") 

Set oDoc = oWord.Documents.Open(f) 
oDoc.Visible = True 

End Sub 

은 나뿐만 아니라이 메시지 :

Excel에서 파일을 열고 어떻게 내 프로그램을 다시 작성에 대한 대안이 있는가 (열려있는 다른 응용 프로그램이없는 경우에도)?

요청으로

Answer 1

는 - 그 예약 된 이름입니다 - - 그리고 당신은 아마 당신이 "파일을 열 때 볼 수없는 워드 오류가 발생하고 이것은 당신은 당신의 Dir 변수를 변경해야합니다 일반적인 문제

입니다 ".

또한 너무 당신의 File 변수 이름을 변경해야합니다 -이 될 수 예약어를 너무 당신이

을 설정 한 참조에 따라

추가 코멘트 : 그것과 관련이

을 동결 - oDoc.Visible = True 문을 제거하고 oWord.Visible = TrueBEFORE 문제 문 Set oDoc = oWord.Documents.Open(f)으로 바꿀 수 있습니다. 그러면 파일 이름에 문제가 있음을 나타내는 오류가 팝업됩니다.