As per @ybeltukov below is what I have in my stylesheet, implemented here as SetOptions
SetOptions[EvaluationNotebook[],
PrintingStartingPageNumber -> 1,
PageHeaders -> {
{Cell[TextData[{CounterBox["Page"]}], "PageNumber"], None, None},
{None, None,
Cell[TextData[{CounterBox["Page"]}], "PageNumber"]}},
PageFooters -> {{None, None, None}, {None, None, None}},
PrintingOptions -> {
"PrintingMargins" -> {{90, 90}, {60, 90}},
"PaperSize" -> {596, 794},
"PageSize" -> {596, 794},
"PageHeaderMargins" -> {60, 60},
"PageFooterMargins" -> {30, 30},
"FirstPageFace" -> Right,
"FirstPageHeader" -> False,
"FirstPageFooter" -> False}
]
I'd recommend having a look at the printing options settings in the options inspector and figure out what you want your base case to be, and then include those settings in a stylesheet within the "Notebook" style data.
