EXCEL如何实现奇偶页打印?【excel实用教程】

EXCEL如何实现奇偶页打印?

  【问题】

  EXCEL如何实现奇偶页打印?

  【解答】
  一是粘贴到WORD中打印;

  二是用宏,编程代码如下:

  Sub PrintOddEven()

  tpg = ExecuteExcel4Macro("GET.DOCUMENT(50)")

  For i = 1 To tpg Step 2

  ActiveSheet.PrintOut i, i

  Next

  For i = 2 To tpg Step 2

  ActiveSheet.PrintOut i, i

  Next

  End Sub





未经允许不得转载:金蝶精斗云 » EXCEL如何实现奇偶页打印?【excel实用教程】