
하나의 파일로 병합해야 하는 500개 이상의 문서 파일이 있습니다. 어떻게 해야 하나요? 텍스트 파일에서 insert -->를 시도했지만 처음 50개만 병합됩니다. 어떤 아이디어가 있나요?
답변1
사용자 인터페이스가 실패하면 매크로를 제안하겠습니다. 파일 이름을 문서라는 단어, 한 문단, 한 이름으로 나열할 수 있습니까? 그런 다음 다음 매크로는 파일 이름을 파일 내용으로 바꿉니다.
Sub Include()
With ActiveDocument
For i = .Paragraphs.Count To 1 Step -1
Set oRange = .Paragraphs(i).Range
sFname = oRange.Text
sFname = Left(sFname, Len(sFname) - 1)
sFname = "c:\tmp\" & sFname
oRange.InsertFile FileName:=sFname
Next
End With
End Sub
귀하의 경로로 바꾸십시오 c:\tmp\
.