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