Delete Page of a MultiPage

's Computer Specifications

How do I remove pages from a MultiPage at run time? (The pages were added at
run time.)
This does not work for me.

Dim delpage As Page
For Each delpage In MultiPage1.Pages
If delpage .index > 2 Then
MultiPage1.Pages.Remove delpage
End If
Next

T.I.A.

Geoff

's Computer Specifications

Hi,

This worked for me.

Dim delpage As Page

For Each delpage In MultiPage1.Pages
If delpage.Index > 2 Then
MultiPage1.Pages.Remove delpage.Index
End If
Next

Cheers
Andy

Geoff wrote:
> How do I remove pages from a MultiPage at run time? (The pages were added at
> run time.)
> This does not work for me.
>
> Dim delpage As Page
> For Each delpage In MultiPage1.Pages
> If delpage .index > 2 Then
> MultiPage1.Pages.Remove delpage
> End If
> Next
>
> T.I.A.
>
> Geoff

--

Andy Pope, Microsoft MVP - Excel
http://www.andypope.info

's Computer Specifications

Hi Andy
Thanks for that.

Geoff

"Andy Pope" wrote:

> Hi,
>
> This worked for me.
>
> Dim delpage As Page
>
> For Each delpage In MultiPage1.Pages
> If delpage.Index > 2 Then
> MultiPage1.Pages.Remove delpage.Index
> End If
> Next
>
> Cheers
> Andy
>
> Geoff wrote:
> > How do I remove pages from a MultiPage at run time? (The pages were added at
> > run time.)
> > This does not work for me.
> >
> > Dim delpage As Page
> > For Each delpage In MultiPage1.Pages
> > If delpage .index > 2 Then
> > MultiPage1.Pages.Remove delpage
> > End If
> > Next
> >
> > T.I.A.
> >
> > Geoff
>
> --
>
> Andy Pope, Microsoft MVP - Excel
> http://www.andypope.info
>

's Computer Specifications

Dim delpage As Page
For Each delpage In MultiPage1.Pages
If delpage.Index > 2 Then
MultiPage1.Pages.Remove delpage.Index
End If
Next

--

HTH

Bob Phillips

(replace xxxx in the email address with gmail if mailing direct)

"Geoff" <(E-Mail Removed)> wrote in message
news:2CE3C300-E5A4-481A-8041-(E-Mail Removed)...
> How do I remove pages from a MultiPage at run time? (The pages were added
at
> run time.)
> This does not work for me.
>
> Dim delpage As Page
> For Each delpage In MultiPage1.Pages
> If delpage .index > 2 Then
> MultiPage1.Pages.Remove delpage
> End If
> Next
>
> T.I.A.
>
> Geoff

Thread Tools
Show Printable Version Email this Page
Rate This Thread
Rate This Thread:

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Can you email a single page from a multipage page word document?	=?Utf-8?B?QXRsYW50YXoz?=	Microsoft Word Document Management	1	2nd Oct 2007 07:24 AM
Multipage - default to particular page	=?Utf-8?B?Q2xheW1hbg==?=	Microsoft Excel Programming	3	25th Jun 2007 03:08 PM
How to delete a page in multipage document	=?Utf-8?B?SmltYm8=?=	Microsoft Word Document Management	2	23rd Aug 2006 05:53 AM
Delete multipage	=?Utf-8?B?YXhlbA==?=	Microsoft Excel Programming	1	14th Nov 2004 03:09 PM
how to put a reference from a page of a multipage form to another page	Valeria	Microsoft Excel Programming	1	24th Jan 2004 09:54 AM