What code can be used to set the paper size, orientation, print area based on current region in each worksheet?
I tried to use the following but it fails:
Dim wSht As Worksheet
For Each wSht In Worksheets
wSht.Range("A1").CurrentRegion.Select
'printsettings code
Next wSht