VBA를 사용하여 바로 가기에서 Word 파일 삽입

바로 가기를 사용하여 프로그래밍 방식으로 Word 파일을 삽입하는 방법은 무엇입니까? 우리 회사는 원본 파일을 더 큰 릴리스 문서와 혼합하고 일치시켜야하며, 하나의 파일을 여러 릴리스 문서에 사용할 수 있습니다.VBA를 사용하여 바로 가기에서 Word 파일 삽입

접근 방식은 소스 파일의 복사본 하나를 갖는 것입니다. 그런 다음 각 릴리스 문서에는 포함해야하는 모든 소스 파일에 대한 바로 가기가 포함 된 고유 한 디렉토리가 있습니다. 올바른 순서로 정렬하려면 바로 가기 이름에 접두사 번호가 있어야합니다. 즉, 바로 가기의 소스 파일 이름이 다릅니다.

실제 경로와 파일 이름을 사용할 때 제대로 작동하지만 바로 가기를 사용할 때 오류가 발생합니다. 런타임 오류 '5273': 문서 이름이나 경로가 유효하지 않습니다.

내가 코드를 사용하고 있습니다 :

Dim strSourceFolder As String 'location of source files 

    ChangeFileOpenDirectory strSourceFolder 

    Selection.InsertFile FileName:= strSourceFolder & "[#-SHORTCUT NAME HERE].docx" _, Range:="", ConfirmConversions:=False, Link:=False, Attachment:=False

출처

2015-01-23 John Morley

바로 가기는 폴더와 파일 이름을 포함 (속성을 마우스 오른쪽 버튼으로 클릭하고 대상 경로 참조) 그래서 당신은 약간의 중복이있다. 또한 바로 가기에는 파일 확장명이 없습니다. 따라서 FileName에 대한 바로 가기 이름을 남겨 두십시오 :

Selection.InsertFile FileName:="[#-SHORTCUT NAME HERE]" _, 
Range:="", ConfirmConversions:=False, Link:=False, Attachment:=False

출처

2015-01-23 21:52:03 Parfait

감사합니다. 아빠에게 감사 드리며, 나는 여전히 작동하지 않습니다. 이제 "Run-time error '5174':이 파일을 찾을 수 없습니다."라는 오류가 발생하여 진행 상황을 추측 할 수 있습니다. 경로를 벗어나는 것은 실제 파일 (바로 가기가 아닌)을 사용할 때 작동하지만, 우리가해야 할 일이 아닙니다. 나는 또한 파일 확장자를 사용하거나 사용하지 않고 시도했다. 추가 제안 사항을 주시면 감사하겠습니다. –

John, 방금 끝 부분을 확인하고 파일 확장자가없는 바로 가기를 사용하여 문서를 성공적으로 삽입했습니다. 확실하게, 바로 가기는 지정된 폴더 strSourcefolder 내에 존재해야합니다 (그러나 반드시 대상이되는 파일 일 필요는 없습니다). – Parfait

감사합니다. 그것이 전혀 작동한다는 것을 안심할 수 있습니다. 내 마지막에는 행운이 없다. 디렉토리를 로컬 하드 드라이브로 옮겼으며 바로 가기 이름을 "Test"로 줄였습니다. 이제 내 컴퓨터 구성에 이상이있을 수 있다고 생각하여 티켓을 IT 그룹에 제출하십시오. 새로운 정보는 매크로 기록에서 비롯됩니다. 녹음에는 바로 가기가 아닌 대상의 경로와 파일 이름이 표시됩니다. 나는 다른 코멘트에 그것을 추가 할 것이다. –

VBA를 사용하여 바로 가기에서 Word 파일 삽입

답변

관련 문제