Help needed on amending macro to be able to print double sided.

ghrek

Active Member
Joined
Jul 29, 2005
Messages
317
Hi

I have this macro below and it prints too small and now want the sheet called "SHIFT SHEET" to print double sided . I need the following area printed on one side A1-J72 and on the other side print K1-S63

Also I need it set up so it fits to the full page size as in on both sides.

Sub PRINTSHEETS()
'
' PRINTSHEETS Macro
'

VBA Code:
    ActiveSheet.Unprotect Password:="EM"
    Columns("A:A").ColumnWidth = 1.29
    Range("L71").Select
    ActiveWindow.SmallScroll Down:=-57
    Range("A1:S72").Select
    Selection.PrintOut Copies:=2, Collate:=True
    Sheets("CASH SHEET").Select
    ActiveWindow.SelectedSheets.PrintOut Copies:=2, Collate:=True, _
        IgnorePrintAreas:=False
    Sheets("SHIFT SHEET").Select
    ActiveSheet.Protect Password:="EM"
    ActiveWorkbook.Save
End Sub

Any ideas?
 

Excel Facts

Difference between two dates
Secret function! Use =DATEDIF(A2,B2,"Y")&" years"&=DATEDIF(A2,B2,"YM")&" months"&=DATEDIF(A2,B2,"MD")&" days"

Forum statistics

Threads
1,147,518
Messages
5,741,640
Members
423,675
Latest member
Dea21

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top