ご教授願います PC初心者です。 下のVBAで「エラー424」が出ます。 どこが悪いのでしょうか？

ご教授願います
PC初心者です。
下のVBAで「エラー424」が出ます。
どこが悪いのでしょうか？

Sub 印刷　（）

Dim ObjTest

ActiveSheet.PrintOut From:1，To:=3

ActiveSheet.PrintOut Copies:=6

PageSetup.PaperSise = xlPaperA4

PageSetup.Orientation = xlLandscape

End Sub

No.2 回答者： duffer_dog 回答日時： 2023/08/04 13:07

PaperSize、Orientation のまえにオブジェクト（ActiveSheet など）が必要です。

ActiveSheet が続きますので With ～ End With で括って以下のようにすると見栄えもよく問題点が見つけやすくなります。

Sub 印刷()

With ActiveSheet
.PrintOut From:=1, To:=3
.PrintOut Copies:=6
.PageSetup.PaperSise = xlPaperA4
.PageSetup.Orientation = xlLandscape
End With

End Sub

No.1 回答者： metabolian 回答日時： 2023/08/03 09:53

・「Dim ObjTest」と書いているが、

この変数がその後使われていない。
・「PaperSise」のスペルが違う…？
・「PageSetup」の手前に「ActiveSheet.」が必要？