EXCEL97で印刷がB4になってしまう！

質問

エクセルで横長の表を作成しました。
多少大き目なので印刷範囲を指定し、ページ設定で「拡大縮小印刷」で横１×縦１ページを選択しました。用紙サイズもA4を指定しました。（その結果縮小率は９１％となります。）
ところが印刷をかけると自動的にB4になってしまうのです。プリンターにはB4用紙を入れていませんので毎回印刷エラーになってしまいます。（B4用紙を入れればOK）
そこでVBAでやってみようと、下記のようにしてみました。

Sub 表印刷()
With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = ""
.RightHeader = ""
.LeftFooter = ""
.CenterFooter = ""
.RightFooter = ""
.LeftMargin = Application.InchesToPoints(0.590551181102362)
.RightMargin = Application.InchesToPoints(0.590551181102362)
.TopMargin = Application.InchesToPoints(0.118110236220472)
.BottomMargin = Application.InchesToPoints(0.118110236220472)
.HeaderMargin = Application.InchesToPoints(0)
.FooterMargin = Application.InchesToPoints(0)
.PrintHeadings = False
.PrintGridlines = False
.CenterHorizontally = True
.CenterVertically = True
.Orientation = xlLandscape
.PaperSize = xlPaperA4
.FirstPageNumber = xlAutomatic
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

しかしこれでやっても同じ結果でした。
なお、同ブックの他のページの表は正常に縮小印刷ができます。
原因と対策がまったくわからず困っています。
お助けください。

回答No.1

shishishishi · ベストアンサー

マクロも全然問題ないし、当然、印刷の設定方法もあってますので、可能性としてはプリンタの設定ではないでしょうか？

プリンターのプロパティを見てください。
用紙はA4でも出力がB4で勝手に設定されてしまうことがたまにあります。経験済（笑）

お礼

さっそくありがとうございます。
やはりご指摘のとおりプリンターのプロパティでした！！

変えた覚えはないのですがいつのまにかB4に変わっていました。

助かりました。ありがとうございます。

回答No.2

yuhzohsan

単純な回答だけど
「ファィル」の「ページ設定」の「用紙サイズ」が「Ｂ４」になっていないかなぁ」
とこういう事ですが…

お礼

ありがとうございます。
もちろんファイルのページ設定はA4ですよ～。（笑）
だから変だと質問したのです。