회사의 다른 사람이나 클라이언트 그룹과 함께 작업 할 때 각 클라이언트에 대해 개인화 된 파일을 만들 수 있습니다. 편지 병합을 사용하여 만드는 것이 가장 좋을 수 있지만 개인 설정이 적당하다면 더 쉬운 방법이 있습니다.

문서를받을 개인의 이름을 한 줄에 하나씩 포함하는 일반 텍스트 파일을 작성하여 시작하십시오. 그런 다음 매크로는 문서의 헤더에 이름을 입력하고 해당 사용자의 이름으로 문서를 저장합니다. 따라서 텍스트 파일에 15 명의 사람이있는 경우 문서의 사본은 1 인당 하나씩 15 개가됩니다. 각각은 헤더에있는 개인의 이름으로 개인화됩니다.

이러한 작업을 수행하는 프로세스는 매우 간단합니다. 텍스트 파일을 열고 이름을 가져 와서 헤더에 넣은 다음 문서를 저장합니다. 다른 이름이 잡히고 파일에 더 이상 이름이 없을 때까지 프로세스가 반복됩니다. 다음 매크로는 이러한 프로세스를 구현합니다.

Sub SaveNameFiles()

Dim sName As String     Dim sFile As String

Open "c:/names.txt" For Input As #5

On Error Resume Next     Do While Not EOF(5)

' get the name         Line Input #5, sName         sFile = sName & ".doc"

sFile = "c:\mypath\" & sFile

ActiveWindow.ActivePane.View.SeekView = _           wdSeekCurrentPageHeader         Selection.WholeStory         Selection.Delete         Selection.TypeText Text:=sName

ActiveWindow.ActivePane.View.SeekView = _           wdSeekMainDocument         ActiveDocument.SaveAs FileName:=sFile     Loop

Close #5

ActiveWindow.ActivePane.View.SeekView = _       wdSeekCurrentPageHeader     Selection.WholeStory     Selection.Delete     ActiveWindow.ActivePane.View.SeekView = _       wdSeekMainDocument End Sub

매크로의 까다로운 부분은 .SeekView 속성을 사용하여 작업 할 문서의 스토리를 지정하는 것입니다. 여기에 구현 된대로 .SeekView 속성은 머리글 영역과 주 문서 사이를 전환하는 데 반복적으로 사용됩니다.

또한 sFile 변수는 개인화 된 문서가 저장 될 파일의 ​​이름을 지정합니다. 텍스트 파일에서 이름을 가져온 직후에 .doc 파일 확장명과 파일 이름 앞에 경로를 추가하여 sFile 변수를 구성합니다. (시스템에 적합한 경로로 변경해야합니다.)

실제 저장 작업은 비교적 쉽습니다. .SaveAs 메서드는 파일 이름과 함께 사용됩니다. 파일에서 읽은 이름 중 하나가 유효한 파일 이름에 적합하지 않은 문자를 포함 할 수 있기 때문에 이것은 매크로에서 가장 오류가 발생하기 쉬운 코드 줄입니다. 이 경우 오류가 생성되고 매크로는 다음 행에서 계속됩니다. 그러나 문서는 문제가되는 이름으로 저장되지 않습니다.

루프 (이름 가져 오기 및 저장)가 완료되면 헤더 영역이 지워지고 .SeekView가 주 문서로 다시 전환됩니다.

_ 참고 : _

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

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

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

(Microsoft Word는 세계에서 가장 인기있는 워드 프로세싱 소프트웨어입니다.)이 팁 (7983)은 Office 365의 Microsoft Word 2007, 2010, 2013, 2016, 2019 및 Word에 적용됩니다.이 팁의 버전은 다음과 같습니다. Word의 이전 메뉴 인터페이스 :

link : / word-Saving_Personalized_Copies_of_a_Document [개인화 된 문서 사본 저장].