Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Fit Selection to Page
See answer in your other thread Shawn
-- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Shawn" wrote in message ... I posted a similar message yesterday but worded it so poorly I thought I would re-post it. I have a lot of data on a sheet and a code selects part of it. When the selected part prints out it prints out on multiple sheets. I don't want to change the entire page setup to fit to pages wide and tall = 1. I just want the selected area to print out on one page. Here is what I have tried and it don't work: Range("A1:N32").Select With Selection .FitToPagesWide = 1 .FitToPagesTall = 1 .PrintOut Copies:=1, Collate:=True End With -- Thanks Shawn |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Fit Selection to Page
Here is it again
Try this tester for the selection I will preview the printout Delete preview:=True when it is working correct Sub test() With ActiveSheet.PageSetup .PrintArea = Selection.Address .Zoom = False .FitToPagesWide = 1 .FitToPagesTall = 1 .Orientation = xlLandscape End With ActiveSheet.PrintOut preview:=True End Sub -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Ron de Bruin" wrote in message ... See answer in your other thread Shawn -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Shawn" wrote in message ... I posted a similar message yesterday but worded it so poorly I thought I would re-post it. I have a lot of data on a sheet and a code selects part of it. When the selected part prints out it prints out on multiple sheets. I don't want to change the entire page setup to fit to pages wide and tall = 1. I just want the selected area to print out on one page. Here is what I have tried and it don't work: Range("A1:N32").Select With Selection .FitToPagesWide = 1 .FitToPagesTall = 1 .PrintOut Copies:=1, Collate:=True End With -- Thanks Shawn |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
fit to one page selection creates one page for each cell | Excel Discussion (Misc queries) | |||
How do I get my page selection to print on one page? | Excel Discussion (Misc queries) | |||
Print selection in one page | Excel Programming | |||
Individual Page Selection | Excel Programming | |||
Page Selection | Excel Programming |