傳回代表工作表上水平分頁符號的 HPageBreaks 集合。 唯讀。
語法
表達。HPageBreaks
詞 代表 工作表 物件的變數。
註解
每張紙的水平分頁符號限制為 1,026 個。
範例
下列程式碼範例會顯示全螢幕和列印區域水平分頁符號的數目。
For Each pb in Worksheets(1).HPageBreaks
If pb.Extent = xlPageBreakFull Then
cFull = cFull + 1
Else
cPartial = cPartial + 1
End If
Next
MsgBox cFull & " full-screen page breaks, " & cPartial & _
" print-area page breaks"
下列程式碼範例會在 A 欄中的儲存格值變更時新增分頁符號。
Sub AddPageBreaks()
StartRow = 2
FinalRow = Range("A65536").End(xlUp).Row
LastVal = Cells(StartRow, 1).Value
For i = StartRow To FinalRow
ThisVal = Cells(i, 1).Value
If Not ThisVal = LastVal Then
ActiveSheet.HPageBreaks.Add before:=Cells(i, 1)
End If
LastVal = ThisVal
Next i
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。