摘要：
前两天做上市会，打印试乘试驾保证书，想自动打印份数编号。不会 VBA，幸亏群里“江山”指点迷津，并亲自写出代码，特纪念在此 1 Sub PRNTbyZSM() 2 3 Dim fsbh As String '份数编号 4 Dim l As Integer 5 Dim i As Integer 6 Dim j As Integer 7 8 Dim c As Integer 9 10 c = Val(InputBox("请输入总份数", "输入份数，默认10份", 10))11 12 Selection.TypeBackspace13 14 Wind 阅读全文
