Results 1 to 3 of 3
  1. #1
    3 Star Lounger
    Join Date
    Jan 2001
    Location
    Las Vegas, Nevada, USA
    Posts
    334
    Thanks
    8
    Thanked 0 Times in 0 Posts
    I'm trying to print multiple copies of an array of worksheets.

    I got the command
    ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
    when I recorded a macro.

    I would like to print multiple copies from ExecuteExcel4Macro "PRINT or ActiveSheet.PrintOut Copies:=11, but I can't get the syntax to work. Example below:

    Sub Print_ExCo_Set()
    ' Print a set for ExCo Macro

    Sheets(Array("Weekly Payroll Trend (a)", "Weekly Payroll (a)", "Sum FTE (a)", _
    "Sum OT Hours (a)", "FTE -Daily(Dept+Shift+Job) (a)", _
    "Weekly HRLY Payroll EXPENSE")).Select

    ' ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"

    ActiveSheet.PrintOut Copies:=11

    End Sub

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts
    Try

    Sheets(Array("Weekly Payroll Trend (a)", "Weekly Payroll (a)", "Sum FTE (a)", _
    "Sum OT Hours (a)", "FTE -Daily(Dept+Shift+Job) (a)", _
    "Weekly HRLY Payroll EXPENSE")).PrintOut Copies:=11

    Note that the sheets aren't selected, just printed.

  3. #3
    3 Star Lounger
    Join Date
    Jan 2001
    Location
    Las Vegas, Nevada, USA
    Posts
    334
    Thanks
    8
    Thanked 0 Times in 0 Posts
    Works like a charm.

    Thank you Hans.

Posting Permissions

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