Ik heb een aantal documenten die ik wil samenvoegen tot een document. Ze zijn potrait georiënteerd op een na die landscape is georiënteerd.
Als ik ze samenvoeg krijgt alles een portait-oriëntatie. Als ik ze verdeel in secties blijft alleen het eerste geopende document in portait en de rest wordt landscape...
Ik doe iets verkeerd. Waarschijnlijk in een volgorde van acties maar ik zie het niet.
Waar zit ik verkeerd?
Als ik ze samenvoeg krijgt alles een portait-oriëntatie. Als ik ze verdeel in secties blijft alleen het eerste geopende document in portait en de rest wordt landscape...
Ik doe iets verkeerd. Waarschijnlijk in een volgorde van acties maar ik zie het niet.
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
| 'Totaaldocument
'Doc1
Documents.Open FileName:=portret1
ActiveDocument.SaveAs FileName:=Textlocatie.Value & "Totaal " & Textprojectnr.Value & ".doc"
'Bookmarks potret1
ActiveDocument.Bookmarks enz...
'Doc2
Selection.InsertBreak (WdBreakType.wdSectionBreakNextPage)
Selection.TypeParagraph
Selection.PageSetup.Orientation = wdOrientPortrait
Selection.InsertFile FileName:=portret2
'Bookmarks portret2
ActiveDocument.Bookmarks enz...
'Doc3
Selection.InsertBreak (WdBreakType.wdSectionBreakNextPage)
Selection.TypeParagraph
Selection.PageSetup.Orientation = wdOrientLandscape
Selection.InsertFile FileName:=Landscape1
'Bookmarks Landscape1
ActiveDocument.Bookmarks enz...
ActiveDocument.SaveAs FileName:=Textlocatie.Value & "Totaal " & Textprojectnr.Value & ".doc" |
Waar zit ik verkeerd?
"What do you get if you multiply six by nine..."