Delete Page of a MultiPage

[Geoff]

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]

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]

Hi Andy
Thanks for that.

Geoff

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

 

[Bob Phillips]

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)