|
|
#6
05-20-2011, 10:12 AM
|
|||
|
|||
Sorry, previous post deletes the second page AND the first row of the third page
This one works ok. ( from my point of view  )Sub DeletePage() ActiveWindow.View = xlPageBreakPreview Range(Rows(ActiveSheet.HPageBreaks(1).Location.Row ), Rows(ActiveSheet.HPageBreaks(2).Location.Row - 1)).EntireRow.Delete End Sub 
|
| Tags |
| delete a page |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| delete email message via blackberry and have it delete on my pop3 and my outlook | Iamthestorm | Outlook | 2 | 10-28-2010 12:21 AM |
 Can I use a formula to name a worksheet?
|
nolesca | Excel | 3 | 06-07-2010 04:02 PM |
| Unable to delete the last blank page. | anandjeevakan | Word | 0 | 12-11-2009 05:20 AM |
| Printing multiple page worksheet with watermark | zany | Excel | 2 | 11-27-2009 01:33 AM |
| How do you delete a blank page at end? | aerophil | Word | 4 | 10-24-2009 05:04 AM |
Windows Vista 
Office 2007
Threaded Mode