ExecuteExcel4Macro でのPage.Setup後、プレビュー画面を開いて最大化をすると、表示画面が灰色になります。

Question

Excel2013にて、不具合？なのか対処手段が分からない件があり、質問させてください。

Excel2013内のマクロにて、下記のマクロを利用しています。

　※ウィンドウ枠の固定をした際に、固定した枠の分、２シート目から印刷幅が短くなる為、下記の方法で対応しています。

---

Sub test()

  ExecuteExcel4Macro "Page.Setup(,,,,,,,,,,,,{3,#N/A})"

  ExecuteExcel4Macro "Page.Setup(,,,,,,,,,,,,{#N/A,#N/A})"

  ActiveSheet.PrintPreview

End Sub

---

Excelの2010までは問題無かったのですが、Excel2013,2016では上記マクロを実行してから、プレビュー画面を最大化した場合に、

初期表示の画面が灰色となり、画面をクリックしないと表示されません。

また、画面の右上も再描画されていないような形となります。

対策として、Excelを一旦保存後、開き直してからプレビューを表示する事で正常に表示されてはいるのですが、

Excelの保存⇒再表示などは行わずに正常に表示する方法について、何かご存知の方がいらっしゃれば教えてください。

以上、宜しくお願いします。

Answer 1

​電気羊 さん、こんにちは。

マイクロソフト コミュニティをご利用いただき、ありがとうございます。

Excel 2010 で問題なかったマクロを Excel 2013 、 Excel 2016 で実行すると思うような動作にならないということですね。

Excel の表示上の現象だと思われますので、念のため以下の手順でハードウェア グラフィック アクセラレータを無効にするにチェックを付けて回避できるかを試してはいかがでしょう。

【手順】: Excel の [ファイル] タブ > オプション > 詳細設定 > [表示] 項目にある [ハードウェア グラフィック アクセラレータを無効にする]  にチェックを入れて OK で閉じる

それでも現象が回避できない場合、もしかしたらマクロコードに変更や修正が必要といった可能性があるのかもしれません。

その場合は VBA 専門の VBA フォーラムがありますので、こちらのフォーラムに投稿して対処法などの情報を集めていただくと良いと思います。

■ Msdn フォーラム - Visual Basic for Application(VBA)

返信お待ちしています。

Answer 2

楠部 啓 様、回答ありがとうございます。

>> 【手順】: Excel の [ファイル] タブ > オプション > 詳細設定 > [表示] 項目にある [ハードウェア グラフィック アクセラレータを無効にする]  にチェックを入れて OK で閉じる

こちら、試してみましたが現象変わりませんでした。

後は教えて頂きましたVBAフォーラムの方で質問してみたいと思います。

対応、ありがとうございました。