Is there a way to print this range without page set up

If [I55] 0 The
Range("A52:I67").Selec
ActiveSheet.PageSetup.PrintArea = "$A$52:$I$67
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=Tru
ActiveSheet.PageSetup.PrintArea = "
End If