同じマクロなのに結果が違う

全く同じマクロを同じパソコンで使っているのにエラーになったりならなかったりします。

以前の質問で教えていただいた方法で
原因となる場所は特定できたのですが何がよくないのかがわかりません。

問題のコードは
「ActiveSheet.PageSetup.PrintArea = "$A$1:$B$2"」
で、
エラーメッセージは
「実行時エラー '1004' PageSetupクラスのPrintAreaプロパティを設定できません。」
というものです。

一体何がよくないのでしょう？

No.5 ベストアンサー 回答者： KenKen_SP 回答日時： 2006/06/26 17:59

Excel のページ設定は、プリンタドライバに情報を問い合わせますので、

有効なプリンタドライバが PC にインストールされてないと、一切ページ
設定などの印刷絡みの操作はできません。

逆に言えば、ドライバさえあれば、プリンタはオフラインでもページ設置
は可能なんです。ここを踏まえ、

> 会社のパソコンなのでプリンタにはLAN経由で接続しています。
> いつでも印刷できる状態です。

とすれば、VBA ソースコード側の問題でしょう。

>「ActiveSheet.PageSetup.PrintArea = "$A$1:$B$2"」

ここで言う ActiveSheet がアクティブの状態でないと実行時にエラー
になるかもしれません、、多分...

できれば、ActiveSheet を使わない書き方がベストですが、どうしても
シートを固定させたくないのであれば、

　　Selection.Select '<--追加
　　ActiveSheet.PageSetup.PrintArea = "$A$1:$B$2"

で、どうでしょう。違うかな...？（自信なし）

この回答へのお礼

質問後も試行錯誤を続けていたのですが、同じパソコンではあるものの、マクロ実行前の状態が違っていました。申し訳ありません。

どうも「オブジェクトの選択」ボタンが有効になっている時にエラ－になり、無効の時には問題なく動くようです。

幸いこのボタンのオン/オフの方法は既知でしたので一応、問題は解決しました。お騒がせしました。

お礼日時：2006/06/26 21:02

No.4 回答者： TTak 回答日時： 2006/06/26 15:22

マクロはどのアプリケーションから実行されていますか。

ActiveXコントロールのイベントプロシージャ内に記述されているのでしょうか。

この回答へのお礼

コメントありがとうございます。
かなり煮詰まっていたもので近視眼的な思考に陥っていました。
「マクロ＝エクセル」ぐらいの狭い視野で説明が疎かになっていました。
今後は気をつけます。

お礼日時：2006/06/26 21:03

No.3 回答者： KenKen_SP 回答日時： 2006/06/26 13:18

プリンタドライバ が インストール されていないと、

ページ 設定を実行できません。

ドライバ はインストールされてますか？

この回答へのお礼

皆様、コメントありがとうございます。
会社のパソコンなのでプリンタにはLAN経由で接続しています。
いつでも印刷できる状態です。

お礼日時：2006/06/26 13:31

No.2 回答者： mshr1962 回答日時： 2006/06/26 12:49

実行時にプリンタ側の電源が入っていないとか？

最近のは、プリンタに印刷命令が行って自動的に電源ONになりますが
タイミングによっては上記のメッセージが出ます。

No.1 回答者： kigoshi 回答日時： 2006/06/26 12:25

（自信を持った回答ではありません）

プリンタはちゃんと使用できる状態でしょうか。
ひょっとしてプリンタ未接続とか使用できない状態のときにエラーがでていないでしょうか。
ご確認下さい。