Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Variable Print Area 1

Status
Not open for further replies.
SgtPepps

SgtPepps

IS-IT--Management
May 1, 2002
109
GB
I need to set the Print area to a selection of cells but the selection will be different every time. Is there a way of setting the Print area to the current selection?

Regards

Sgtpepps
 
Sort by date Sort by votes
Yup:
ActiveSheet.PageSetup.PrintArea = Selection.Address

if you are manually selecting the range to print
or:
LRow = range("A65536").end(xlup).row
LCol - rnage("IV1").end(xltoleft).column
Activesheet.pagesetup.printarea = range(cells(1,1),cells(LRow,LCol))

If you just want to sleect the whole range of used data

HTH
Geoff
 
Upvote 0 Downvote
Status
Not open for further replies.

Similar threads

arvarr
  • Locked
  • Question
Variable in Pivot Table 1
Replies
4
Views
149
arvarr
arvarr
remeng
  • Locked
  • Question
Capture active macro name as a variable 1
Replies
16
Views
268
Andrzejek
Andrzejek
MattGreer
  • Locked
  • Question
Using A Boolean in a Calc, and setting a variable = "0" 3
Replies
6
Views
119
SkipVought
S
DEBLACKJACKAL
  • Locked
  • Question
HOW TO QUERY AND EMPTY A MULTI COLUMN LIST BOX AND PRINT THE FILTERED RESULTS OF A LIST BOX
Replies
5
Views
127
mintjulep
M
telephoto
  • Locked
  • Question
Pause vba and select cell as value for variable 1
Replies
8
Views
145
telephoto
telephoto

Part and Inventory Search

Sponsor

Back
Top