①启动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
⑤最后,执行宏即可完成逆序打印了。编程十分好用,但是也难理解。不得不说从事程序员是一项苦逼的差事。
IT时代网(关注微信公众号ITtime2000,定时推送,互动有福利惊喜)所有原创文章版权所有,未经授权,转载必究。
创客100创投基金成立于2015年,直通硅谷,专注于TMT领域早期项目投资。LP均来自政府、互联网IT、传媒知名企业和个人。创客100创投基金对IT、通信、互联网、IP等有着自己独特眼光和丰富的资源。决策快、投资快是创客100基金最显著的特点。
小何
小何
小何
小何