I want my macro to apply the same print settings to
multiple sheets in my workbook. I have tried the
following code but get an error in the first line.

With ActiveWorkbook.Worksheets(Array
("Reference", "IncomeStatement", "CashStatement
1", "CashStatement 2")).PageSetup
.PaperSize = xlPaperLegal
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With

Any suggestions are much appreciated.