K
kaveh
how can i extend the printable area up to the very last row (i can't go
beyond 265 pages) in Page Break Preview?
beyond 265 pages) in Page Break Preview?
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an alternative browser.
You should upgrade or use an alternative browser.
B
Barb Reinhardt
I believe there is a limit to the number of manual page breaks you can have.
(at least in 2003)
(at least in 2003)
G
Gord Dibben
Barb
OP did not have the proper print range set. Once done, was able to get all
the pages needed.
I am able to get pagebreaks for A1:A65536 range in Excel 2003.
I can find no limit other than 65536 rows.
Gord
OP did not have the proper print range set. Once done, was able to get all
the pages needed.
I am able to get pagebreaks for A1:A65536 range in Excel 2003.
I can find no limit other than 65536 rows.
Gord
D
Dave Peterson
This blew up for me on the 1028th pagebreak:
Option Explicit
Sub testme()
Dim iCtr As Long
With ActiveSheet
On Error Resume Next
For iCtr = 2 To .Rows.Count
.HPageBreaks.Add before:=.Cells(iCtr, "A")
If Err.Number = 0 Then
'ok
Else
Err.Clear
MsgBox "Error with: " & iCtr & vbLf & iCtr - 1 & " worked ok"
Exit For
End If
Next iCtr
On Error GoTo 0
End With
End Sub
ps. I used xl2003.
Option Explicit
Sub testme()
Dim iCtr As Long
With ActiveSheet
On Error Resume Next
For iCtr = 2 To .Rows.Count
.HPageBreaks.Add before:=.Cells(iCtr, "A")
If Err.Number = 0 Then
'ok
Else
Err.Clear
MsgBox "Error with: " & iCtr & vbLf & iCtr - 1 & " worked ok"
Exit For
End If
Next iCtr
On Error GoTo 0
End With
End Sub
ps. I used xl2003.
G
Gord Dibben
Blew up on me also.
My earlier test was manual by entering data in column A to row 65536.
Set margins to give me two rows per page.
Pagebreak preview shows 32768 pages.
This returns 32768 pages.
Sub test_pages()
totalpages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
MsgBox totalpages
End Sub
I'm not about to print out to test<g>
Gord
My earlier test was manual by entering data in column A to row 65536.
Set margins to give me two rows per page.
Pagebreak preview shows 32768 pages.
This returns 32768 pages.
Sub test_pages()
totalpages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
MsgBox totalpages
End Sub
I'm not about to print out to test<g>
Gord
G
Gord Dibben
Although.......help on specs states 1000 horizontal and vertical pagebreak
limit
So..........what preview shows ain't necessarily what you will get.
Off to bed now<g>
Gord
limit
So..........what preview shows ain't necessarily what you will get.
Off to bed now<g>
Gord
K
kaveh
Thnks for your answear>
Barb Reinhardt said:I believe there is a limit to the number of manual page breaks you can have.
(at least in 2003)
K
kaveh
Thank you so much.
Dave Peterson said:This blew up for me on the 1028th pagebreak:
Option Explicit
Sub testme()
Dim iCtr As Long
With ActiveSheet
On Error Resume Next
For iCtr = 2 To .Rows.Count
.HPageBreaks.Add before:=.Cells(iCtr, "A")
If Err.Number = 0 Then
'ok
Else
Err.Clear
MsgBox "Error with: " & iCtr & vbLf & iCtr - 1 & " worked ok"
Exit For
End If
Next iCtr
On Error GoTo 0
End With
End Sub
ps. I used xl2003.
K
kaveh
Thanks for your answear.
Gord Dibben said:Barb
OP did not have the proper print range set. Once done, was able to get all
the pages needed.
I am able to get pagebreaks for A1:A65536 range in Excel 2003.
I can find no limit other than 65536 rows.
Gord