怎样用宏来完成Excel2007工作表的逆序打印功能

时间:2021-05-21

在出书或者是长篇小说打印的时候,你不设置逆序打印,那么打出来的纸张就需要重新编排,因为第一页是放在最下面的,多了的话显然没那工夫再去一张一张的调序。下面教大家用宏的方法解决Excel表格的逆序打印。

  启动Excel表格,单击视图--宏--录制宏。

  宏名可以自己随意定,但为了正规,一般都采用英文命名法,ReversePrint。

  命名之后,返回主界面,按ALT+F8快捷键打开宏管理界面,选择ReversePrint,单击编辑按钮。

  下面,我以我以往的编程经验,提供大家下面的代码,大家只需要将其替换原先的代码即可。

  Sub ReversePrint()

  Dim NumPages As Long, Page As Long

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

  For Page = NumPages To 1 Step -1

  ActiveSheet.PrintOut from:=Page, To:=Page

  Next Page

  End Sub

  最后,执行宏即可完成逆序打印了。编程十分好用,但是也难理解。不得不说从事程序员是一项苦逼的差事。

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章