수년에 걸쳐 Phillip의 회사는 수천 개의 Word 문서를 개발했습니다. 최근에는 Phillip 부서의 모든 사람을 위해 다른 서버와 업그레이드 된 컴퓨터를 사용하도록 네트워크 인프라를 변경했습니다. 누군가 기존 문서 중 하나를 열면 이전 인프라에 있었지만 더 이상 사용할 수없는 템플릿을 찾습니다. 즉, 문서를 여는 데 오랜 시간이 걸리며 이후 잘못된 템플릿 참조를 변경할 수 있습니다. Phillip이 각 이전 문서를 열어야하는 경우에는이를 수행하는 데 며칠과 며칠이 걸릴 것이므로 각 문서를 열 필요없이 템플릿 참조를보다 효율적으로 변경할 수있는 방법이 있는지 궁금합니다.

이것은 정말 귀찮을 수 있습니다. (사무실에) 더 나쁜 것은 거의 없습니다

어떤 과정이 끝날 때까지 기다리면서 컴퓨터 화면을 응시하는 것보다.

무슨 일이 일어나고 있는지 Word는 템플릿이 특정 위치에 있다고 생각하고 Windows에서 해당 위치에 템플릿을 가져 오도록 요청합니다.

Windows는 반복적으로 위치를 찾고 준수하기 위해 성실하게 시도하고 시도하고 시도합니다. 각 시도는 시간 초과되며이 헛된 시도에 소요 된 총 시간은 상당히 눈에 띕니다.

해결책은 매크로를 사용하여 디렉토리의 각 문서를로드하고 해당 문서에 첨부 된 템플릿을 변경하는 것입니다. 다음은 이러한 매크로의 예입니다.

Sub BatchTemplateChange()

Dim sPathToTemplates As String     Dim sPathToDocs As String     Dim sDoc As String     Dim dDoc As Document     Dim sNewTemplate As String     Dim i As Long

On Error Resume Next     Application.ScreenUpdating = False

sNewTemplate = "normal.dot"         'new template name     sPathToDocs = Options.DefaultFilePath(wdDocumentsPath) & "\"

sPathToTemplates = Options.DefaultFilePath(wdUserTemplatesPath) & "\"



sDoc = Dir(sPathToDocs & "*.doc")



While Len(sDoc) <> 0         Set dDoc = Documents.Open(FileName:=sPathToDocs & sDoc)

dDoc.AttachedTemplate = sPathToTemplates & sNewTemplate         dDoc.Close wdSaveChanges         sDoc = Dir         i = i + 1     Wend

Application.ScreenUpdating = True     MsgBox "Finished: " & i & " documents changed"

End Sub

매크로는 각 문서를 기본 문서 위치에로드하지만로드 속도가 반드시 빨라지는 것은 아닙니다. 매크로 사용의 이점은 실행을 시작하고 컴퓨터에서 떨어져있는 동안에도 작동하도록 할 수 있다는 것입니다.

프로그래밍 방식에 대한 추가 아이디어는 다음 사이트에서 찾을 수 있습니다.

http://support.microsoft.com/kb/830561 http://www.edugeek.net/forums/scripts/35199-vba-script-change-word-document-template-location.html

_ 참고 : _

이 페이지 (또는 WordTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / wordribbon-WordTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_WordTips_는 비용 효율적인 Microsoft Word 교육을위한 소스입니다.

(Microsoft Word는 세계에서 가장 널리 사용되는 워드 프로세싱 소프트웨어입니다.)이 팁 (11404)은 Microsoft Word 97, 2000, 2002 및 2003에 적용됩니다. Word의 리본 인터페이스에 대한이 팁 버전 (Word 2007)을 찾을 수 있습니다. 이후) 여기 :

link : / wordribbon-Updating_Many_Template_References [많은 템플릿 참조 업데이트].