Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

58582 / 76732

←次へ　｜　前へ→


	【22875】Re:改ページ

koshimizu - 05/3/5(土) 13:59 -


	引用なし

	パスワード

G-Luck さん
>それで結構です。記してください。
ctiveWindow.SmallScroll Down:=-3
　　ActiveWindow.SelectedSheets.PrintPreview
　　ActiveWindow.SmallScroll Down:=-51
　　Set ActiveSheet.HPageBreaks(1).Location = Range("A50")
　　ActiveWindow.SmallScroll Down:=54
　　ActiveSheet.PageSetup.PrintArea = "$A$1:$A$96"
　　ActiveSheetA.PageSetup.PrintArea = "$A$1:$A$103"
　　Set ActiveSheet.HPageBreaks(2).Location = Range("A97")
　　ActiveWindow.SelectedSheets.PrintPreview

ここを使用すると思うんですが
ActiveWindow.SelectedSheets.PrintPreview
　　Set ActiveSheet.HPageBreaks(1).Location = Range("A47")
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　ここが？

1 hits

▼

【22820】改ページ koshimizu 05/3/4(金) 13:21