分类：电脑/网络-软件-办公软件
问题：在EXCEL里，怎样设置打印次数在excel里，我想设置一个数， 
在里，我想设置一个数，但是他随着打印的次数而增加，如最先设置为0000，而当每打印一次后，就增加一个值，即打印一次后就变为0001，打印两次，此数就变为0002，但这个数可以在excel里显示。
回答：在　thisworkbook 对象中添加代码：
Private Sub Workbook_BeforePrint(Cancel As Boolean)
i = Sheet1.Range("H1").Value
Sheet1.Range("H1").Value = i + 1
End Sub

上述方法不是很完善，最好把这个值放在注册表中。
Private Sub Workbook_BeforePrint(Cancel As Boolean)
i = Val(GetSetting(appname:="MyApp", section:="Startup", key:="number", Default:="0"))
i = i + 1
MsgBox "本文档打印次数：" & i
SaveSetting "MyApp", "Startup", "number", i

End Sub