Sub view_pagebreak()
	ActiveWindow.View = xlPageBreakPreview
	'現在のビューを改ページプレビューにします
End Sub