Group: microsoft.public.word.vba.general
From: "Doug Robbins - Word MVP"
Date: Wednesday, April 09, 2008 3:00 PM
Subject: Re: next page - section break / insert file

Dim myDoc as Document
Dim docrange as Range

Set myDoc = ActiveDocument
With myDoc
.Unprotect
Set docrange = Selection.Bookmarks("\Page").Range
docrange.Collapse wdCollapseEnd
docrange.InsertBreak wdSectionBreakNextPage
Set docrange = .Range
docrange.Collapse wdCollapseEnd
docrange.InsertFile "Drive:\Path\Filename"
.Protect wdAllowOnlyFormFields, NoReset
End With


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"bryan" wrote in message
news:E92DE822-E10F-4CFE-80A8-116FA381FE7D@microsoft.com...
>A 2 prong question:
>
> I have a protected template which has 4 different check boxes. If a check
> box is checked, I need to insert a section break/next page AFTER the page.
> Once I have inserted the break, I then need to insert a file (document)
> from
> our network drive.
> This example, I could insert 4 different files to my template.
>
> Not sure how to code appropriately to add the section break or to insert
> file.
>
> Any help would be appreciated.
>
> Thanks,
> Bryan