excel

印刷で、グレースケールのあと初期設定に戻す。
 これをマクロで出来ないのですがナゼ? 
  また、出来る方法は。

回答の条件
  • 1人1回まで
  • 登録:2009/11/05 07:24:34
  • 終了:2009/11/11 04:16:44

回答(2件)

id:sm0k3 No.1

03回答回数591ベストアンサー獲得回数392009/11/05 10:41:28

ポイント35pt

http://www.asahi-net.or.jp/~zn3y-ngi/YNxv9b748.html

プリンタ側の設定はVBAでは難しそうですが、Excel側の設定で同じ結果が出そうです。

id:airplant No.2

airplant回答回数220ベストアンサー獲得回数492009/11/05 16:15:11

ポイント35pt

プリンタ側の設定はExcel VBA標準では、残念ながらできません。ですから、マクロの記録を行っても、操作が記録されません。

なお、相当高度な知識があれば、プリンタドライバを調査して作成することは不可能ではないと思います。


グレースケールの替わりにExcel標準の白黒印刷で良ければ、次のコードでできます。

ActiveSheet.PageSetup.BlackAndWhite = True '白黒にする
  :
ActiveSheet.PageSetup.BlackAndWhite = False '元に戻す

一番いいのは、設定の違うプリンタを二つ用意して、ActivePrinterを切り替える方法です。

詳細は、下記の「5)プリンタを指定する」、「6)プリンタを一時変更する」を参考にしてみてください。Excel 2000のチェックが入っているので、そのif文は外してください。

http://www.asahi-net.or.jp/~zn3y-ngi/YNxv261.html

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません