Excel VBA質問箱 IV

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

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


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

20485 / 76732

←次へ　｜　前へ→


	【61665】紙のサイズ設定でエラーに

うなぎ - 09/5/25(月) 18:21 -


	引用なし

	パスワード

このサイトは詳しい人が多くていいですね！はじめて質問させていただきます。

Excel 2000で作って今まで問題なかったのですが、
プリンタを変えたら、用紙サイズを設定する以下の文で
「PageSetupクラスのPaperSizeプロパティを設定できません。(1004)」という
エラーが起きるようになりました。（sSheetはシート名）

Sheets(sSheet).PageSetup.PaperSize = xlPaperB4　'B4を設定

VBEのオブジェクトブラウザで見るとxlPaperB4という定数は12です。

手動では設定できるので、それをマクロ記録してみたら、
　.PaperSize = 159
となりました。

プリンタが変わると、同じサイズでも数値が変わるのでしょうか？
プリンタを変えるたびにコードを直さずにすむ汎用性のあるコードにしたいのですが、どうしたらよいか知恵を貸していただけないでしょうか？

なお、プリンタは富士ゼロックス DocuColor 1257 GAです。
Excelは2007から実行しても結果は同じです。
よろしくお願いします。

4 hits

▼

【61665】紙のサイズ設定でエラーに うなぎ 09/5/25(月) 18:21

≪