• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Print Area Macro

B

bfraser

Member
I am using a number of cells to allow the user to set the Print Area based on the text in a cell. BR in the below recorded macro. The cells are in A1:G3. I used Dwg tools, made a box, 100% transparent and placed them over the cells. 1) Easier way than rec. individual macros and 2) How can I clear the print area once the w/s is printed.


Sub printareabr()

' printareabr Macro

' Print Area for BR-Pivot Table

' Range("A5:G37").Select

ActiveSheet.PageSetup.printarea = "$A$5:$G$37"

End Sub
 
Setup a number of cells with the areas of different print areas typed in

then loop through the range and print the various ranges


To clear the print area

ActiveSheet.PageSetup.PrintArea = ""+


Also have a read of my solution here:

http://chandoo.org/forums/topic/macro-to-print-out-different-dashboards-from-a-list-of-names

It may be of use to you
 
You must log in or register to reply here.
Back
Top