2014-06-19 13 views
2

저는 하나의 템플릿에 여러 단어 파일을 결합하려는 vb.net 프로그램을 작성했습니다.Word 자동화 - Selection.InsertFile 페이지 방향을 무시합니다.

나는를위한 각-문서 루프에서이 코드 줄을 사용하고 있습니다 : 일반적으로

oWord.Selection.InsertFile(FileName:=DocumentFilename, Range:="", _  ConfirmConversions:=False, Link:=False, Attachment:=False) 

또는

oWord.Selection.InsertFile(FileName:=DocumentFilename, ConfirmConversions:=False) 

:

oWord.Selection.InsertFile(DocumentFilename, "", False, False, False) 

나는 이러한 라인을 시도 그 작품.
하지만 문제는 다음과 같습니다.
. 1-5 페이지는 세로, 6 페이지는 가로로, 7 페이지는 다시 세로로 표시되며 내 코드는 그 사실을 무시하고 모든 페이지를 세로로 추가합니다.

+0

답변을 찾았습니까? 나는 똑같은 문제가있다. – jramm

답변

1

죄송합니다. 예, 해결책을 찾았습니다. 각 문서의 시작 부분에 섹션 나누기를 추가합니다.

oDocQuell = oWordQuell.Documents.Add(txtSourcedrive.Text & "\" & LI.ToString) 
oWordQuell.Selection.HomeKey(Unit:=Word.WdStoryType.wdEvenPagesHeaderStory) ' Word-VBA: Selection.HomeKey Unit:=wdStory 
oWordQuell.Selection.InsertBreak(Type:=Word.WdBreakType.wdSectionBreakContinuous) ' Word-VBA: Selection.InsertBreak Type:=wdSectionBreakContinuous