电子表格打印固定资产卡片

2025-05-22 15:33:31

1、打开电子表格,设计打印内容及位置。要根据打印测试的效果不断完善

电子表格打印固定资产卡片

2、alt+F11进入,编写宏,内容如下:Sub 自动序号打印()y = InputBox("请输入打印页数")For I = 1 To yActiveSheet.PrintOuts = ActiveSheet.Cells(3, 6)s = Format(Val(Cells(3, 6)) + 1, "000")ActiveSheet.Cells(3, 6) = sNextEnd Sub

电子表格打印固定资产卡片

3、点图中圆圈图标,返回到电子表格界面

电子表格打印固定资产卡片

4、添加文本框并关联。

电子表格打印固定资产卡片

5、把刚才做的宏关联好。

电子表格打印固定资产卡片

6、测试一下。

电子表格打印固定资产卡片

7、测试后发现一切按目标实现了编号自动加。

8、保存,选择启用宏的工作簿这一选项,以备以后用。再次打开测试OK

声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
猜你喜欢