VBA code to change the print setup

Joe4

MrExcel MVP, Junior Admin

Joined

Aug 1, 2002

Messages

72,265

Office Version

1. 365

Platform

1. Windows

• May 26, 2009

• #2

If you turn on the Macro Recorder and record yourself performing these steps manaully, it should give you the VBA code you desire.

 

Upvote 0

N

notanexpert

Board Regular

Joined

May 21, 2009

Messages

142

• May 26, 2009

• #3

i tried that a couple of times and wasn't able to get it to work when i put it into the code. but i will give it another shot

 

Upvote 0

Joe4

MrExcel MVP, Junior Admin

Joined

Aug 1, 2002

Messages

72,265

Office Version

1. 365

Platform

1. Windows

• May 26, 2009

• #4

If you continue to have problems, post the code you are generating, and explain exactly what settings you are trying to change (and to what values).

 

Upvote 0

VoG

Legend

Joined

Jun 19, 2002

Messages

63,650

• May 26, 2009

• #5

Try this: right click the Excel logo just to the left of File on the menu bar, select View Code and paste in

Code:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim ws As Worksheet
For Each ws In ActiveWindow.SelectedSheets
    ws.PageSetup.PrintArea = "A1:AS74"
Next ws
End Sub

Then press ALT + Q to close the code window. The print range should now be set automatically when you print (or print preview).

 

Upvote 0