[[20250618135005]]　『印刷プレビューするマクロを実行すると画像が途切』（はな）　ページの最後に飛ぶ

『印刷プレビューするマクロを実行すると画像が途切れて表示される』（はな）

■1ページ目をプレビューするマクロを実行すると、２７行目以下は画像だけ表示されません。
マクロからでなくクイックアクセスから印刷プレビューすると画像も正しく表示されています。
プレビューするマクロを実行して印刷すると27行目以下の画像も正しく印刷されます。

1ページ目をプレビューするマクロを実行した時、印刷範囲すべての画像を正しく表示させるにはどうしたら良いでしょうか？

Sub 1ページ目プレビュー()

    ActiveSheet.PrintOut From:=1, To:=1, Preview:=True
End Sub

・1ページ目の印刷範囲：Ａ１～Ｕ３９
・２６行目までしか画像が表示されない
・２７行目以下は画像だけが表示されない
※26行目～27行目に跨いでいる画像は途切れてプレビューされます。

＜使用 Excel：Excel2016、使用 OS：Windows11 ＞

 PrintOut ではなく、ShowPrintPreview を使い

 ActiveWindow.SelectedSheets.ShowPrintPreview

 ではどうでしょう

（通りすがった） 2025/06/18(水) 14:49:20

データに何か問題はないですか？
こちらの環境では特に問題なくプレビューできます。

異なるデータでいろいろと試してみてください。
（ゆたか） 2025/06/18(水) 15:54:30

 > マクロからでなくクイックアクセスから印刷プレビューすると画像も正しく表示されています。
 であれば、クイックアクセスからの印刷プレビュー自体をマクロで以下のように実行すればよいのでは？
 表示される結果を教えてください。

 Sub test()
     Application.CommandBars.ExecuteMso "PrintPreviewAndPrint"
 End Sub

（xyz） 2025/06/18(水) 16:51:59

特定のページをプレビューするマクロを実行すると何をしても画像が途切れて、原因も特定できなかったため諦めました。
回答いただきましてありがとうございました。
（はな） 2025/06/18(水) 17:15:19

＞・1ページ目の印刷範囲：Ａ１～Ｕ３９
A4用紙に印刷するんでしょうか。
用紙に合わせてページを設定したらどうですか。
＞何をしても
どのようなことされたんですか。
（?） 2025/06/18(水) 20:48:05

コメント返信：