Delete blank pages

macropod · #1 09-07-2014, 04:03 AM

Quote:

Originally Posted by Dimsok

When i type, blank pages always appear after about 30 pages. So in document with about 300 pages i have plenty of them

That suggests you're going about the blank page creation the wrong way. Are you using manual page breaks or Section Breaks to create them, or some other method?

Here's a slightly different approach to clearing out trailing content in a document:

Code:

Sub Demo()
With ActiveDocument.Characters.Last
  While .Previous.Text Like "[ " & Chr(160) & vbCr & vbTab & Chr(12) & "]"
    .Previous.Text = vbNullString
  Wend
End With
End Sub

Dimsok · #2 09-07-2014, 05:04 AM

Quote:

Originally Posted by macropod

Are you using manual page breaks or Section Breaks to create them, or some other method?
[/code]

I don't have any guess. Just in default. Office 2007.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
deleting blank pages	thauser	Word	3	05-27-2014 01:56 AM
Deleting blank pages	Microsoftenquirer1000	Word	14	08-27-2012 01:24 PM
delete blank pages from mail merge document	blusea	Word	0	12-17-2010 06:10 PM
How do you delete a blank page at end?	aerophil	Word	4	10-24-2009 05:04 AM
hidden blank pages	mljm	Word	3	06-19-2009 03:18 AM