excel设计的单据自动编号

96次

问题描述:

excel设计的单据自动编号急求答案,帮忙回答下

最佳答案

推荐答案

Sub 打印记数_单击() Range(\"A1\").Select '[A1]是要变单元格位置 ActiveCell.FormulaR1C1 = [A1] + 1 '1是看你要加多少,[A1]是单元格位置 ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True '1是打印1份 End Sub工具,宏,编辑器

为你推荐