+ Reply to Thread
Results 1 to 2 of 2

Apply Print Settings to Multiple Sheets via MACRO

Hybrid View

ShaneBell Apply Print Settings to... 07-20-2009, 05:16 PM
Leith Ross Re: Apply Print Settings to... 07-20-2009, 08:48 PM
  1. 07-20-2009, 05:16 PM #1
    ShaneBell is offline
    Registered User
    Join Date
    06-28-2006
    Posts
    19

    Apply Print Settings to Multiple Sheets via MACRO

    Attempting to record a macro for a three sheet workbook.

    MACRO selects all pages but applies print settings of "Fit to 1 Page Wide" to first page Only. How can i set Macro to apply "Fit to 1 Page Wide" for all three selected sheets?

    Thanks
    Shane
    Reply With QuoteRegister To Reply
  2. 07-20-2009, 08:48 PM #2
    Leith Ross is offline
    Forum Moderator Leith Ross's Avatar
    Join Date
    01-15-2005
    Location
    San Francisco, Ca
    MS-Off Ver
    2000, 2003, & 2010
    Posts
    23,259

    Re: Apply Print Settings to Multiple Sheets via MACRO

    Hello ShaneBell,

    This will set all the worksheets the same.
    Sub Macro2()

  Dim Wks As Worksheet
  
    For Each Wks In Worksheets
      Wks.PageSetup.FitToPagesWide = 1
    Next Wks
    
End Sub
    Sincerely,
    Leith Ross

    Remember To Do the Following....

    1. Use code tags. Place [CODE] before the first line of code and [/CODE] after the last line of code.
    2. Thank those who have helped you by clicking the Star below the post.
    3. Please mark your post [SOLVED] if it has been answered satisfactorily.


    Old Scottish Proverb...
    Luathaid gu deanamh maille! (Rushing causes delays!)
    Reply With QuoteRegister To Reply
+ Reply to Thread
« Previous Thread | Next Thread »

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Forum Rules


Search Engine Friendly URLs by vBSEO 3.6.0 RC 1