LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 27
Default Unable to insert Pagebreak before row 1108 !!

Dear All,

Before printing ( using code under commandbutton) the code inserts
pagebreaks before each chapter ( column 1 not empty).
Works fine about 1 year !
Suddenly in 1 worksheet before row 1108 it is not possible to insert a
pagebreak, Not by code and NOT manualy.
The code triggers error 1004 Application-defined or objecdefined error.

Do YOU know a possible cause for this behavior.


If bSetPagebracksChapters = True Then
With ActiveSheet
.ResetAllPageBreaks
iLastSourceRow = .Cells(Rows.Count, "A").End(xlUp).Row
'Search for the last row with data in Column A
For iRow_Index = 2 To iLastSourceRow Step 1
If IsEmpty(.Cells(iRow_Index, 1).Value) Then
Else
.HPageBreaks.Add Befo=.Cells(iRow_Index, 1)
<<<< This line triggers error 1004 on row 1108 only !!!!!
End If
Next
End With
End If

Thanks,

Filip


 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Insert pagebreak when a specific word appears in a column. Neal Excel Discussion (Misc queries) 4 October 27th 08 11:17 PM
Cant move pagebreak in PageBreak View in Excel2003 Vasanthan Excel Worksheet Functions 1 August 22nd 07 03:28 PM
Insert row after pagebreak amepluie Excel Programming 2 January 3rd 07 09:46 AM
INSERT HORIZONTAL PAGEBREAK AFTER EACH LINE IN ENTIRE WORKSHEET . KNPALIA Excel Worksheet Functions 1 October 27th 06 05:46 PM
insert pagebreak after a specific column? Macroman Excel Programming 0 August 3rd 06 12:16 PM


All times are GMT +1. The time now is 08:14 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"