代账入库单生成

• 

  好顺佳集团

• 

  2022-08-09 08:29:54

• 

  1719

视频系列课程18，3课已上传，记得领取学习码！

第一节：Excel财经必看，动态查询统计！

第 2 部分：Excel 自由跳转表 - 超链接！

第三节：Excel根据收据自动生成明细账！

转发文章到朋友圈，免费学习最新5门视频课程，学无止境！见文章最后说明！

如下图，今天我们做一个VBA练习。主要功能如下：

1.点击按钮1，自动调整收据编号；

2. 点击按钮 2 自动调整收据编号。日期;

3、输入仓单后，点击保存，仓单信息会自动保存到入库单中。

让我们看看如何制作这些功能！

制作过程 1、点击开发工具菜单，插入，表单控件，选择第一行的数值调整按钮，然后在图表中画一个大小适中的方框，出现一个数值调整按钮。 2、右击数值调整按钮，设置格式，将单元格链接到K1单元格，确认。 3.然后在收据编号中设置公式：=RKTEXT(K1,00000);现在点击调整按钮1，可以自动更改收据编号。 4、同样的方法，将调整按钮2链接到单元格K2，然后在入库日期中设置公式：=2018-1-1K2，现在点击调整按钮2，入库日期会自动改变. 5、按ALT F11调出代码编辑器，插入模块1，双击模块1，打开代码窗口，插入程序：保存，输入下图中的代码，保存，关闭。

制作过程 1、点击开发工具菜单，插入，表单控件，选择第一行的数值调整按钮，然后在图表中画一个大小适中的方框，出现一个数值调整按钮。 2、右击数值调整按钮，设置格式，将单元格链接到K1单元格，确认。 3.然后在收据编号中设置公式：=RKTEXT(K1,00000);现在点击调整按钮 1，收据编号可以自动更改。 4、同样的方法，将调整按钮2链接到单元格K2，然后在入库日期中设置公式：=2018-1-1K2，现在点击调整按钮2，入库日期会自动改变. 5、按ALT F11调出代码编辑器，插入一个模块1，双击模块1，打开代码窗口，插入一个进程：保存，输入下图中的代码，保存，关闭。

1、点击开发者工具菜单，插入，表单控件，选择第一行的数值调整按钮，然后在图表中画一个大小适中的方框，就会出现一个数值调整按钮。

2、右击数值调整按钮，设置格式，将单元格链接到K1单元格，确认。 3.然后在收据编号中设置公式：=RKTEXT(K1,00000);现在点击调整按钮1，可以自动更改收据编号。 4、同样的方法，将调整按钮2链接到单元格K2，然后在入库日期中设置公式：=2018-1-1K2，现在点击调整按钮2，入库日期会自动改变. 5、按ALT F11调出代码编辑器，插入一个模块1，双击模块1，打开代码窗口，插入一个进程：保存，输入下图中的代码，保存，关闭。

2、右击数值调整按钮，设置格式，将单元格链接到K1单元格，确认。 3.然后在收据编号中设置公式：=RKTEXT(K1,00000);现在点击调整按钮1，可以自动更改收据编号。 4、同样的方法，将调整按钮2链接到单元格K2，然后在入库日期中设置公式：=2018-1-1K2，现在点击调整按钮2，入库日期会自动改变. 5、按ALT F11调出代码编辑器，插入一个模块1，双击模块1，打开代码窗口，插入一个进程：保存，输入下图中的代码，保存，关闭。

2、右击数值调整按钮，设置格式，将单元格链接到K1单元格，确认。

3、然后在收据编号中设置公式：=RKTEXT(K1,00000);现在点击调整按钮1，可以自动更改收据编号。 4、同样的方法，将调整按钮2链接到单元格K2，然后在入库日期中设置公式：=2018-1-1K2，现在点击调整按钮2，入库日期会自动改变. 5、按ALT F11调出代码编辑器，插入一个模块1，双击模块1，打开代码窗口，插入一个进程：保存，输入下图中的代码，保存，关闭。

3、然后在收据编号中设置公式：=RKTEXT(K1,00000);现在点击调整按钮1，可以自动更改收据编号。 4、同样的方法，将调整按钮2链接到单元格K2，然后在入库日期中设置公式：=2018-1-1K2，现在点击调整按钮2，入库日期会自动改变. 5、按ALT F11调出代码编辑器，插入一个模块1，双击模块1，打开代码窗口，插入一个进程：保存，输入下图中的代码，保存，关闭。

3、然后在收据编号中设置公式：=RKTEXT(K1,00000);现在点击调整按钮1，可以自动更改收据编号。

4、同样的方法，将调整按钮2链接到单元格K2，然后在入库日期中设置公式：=2018-1-1K2，现在点击调整按钮2，入库日期会自动改变. 5、按ALT F11调出代码编辑器，插入一个模块1，双击模块1，打开代码窗口，插入一个进程：保存，输入下图中的代码，保存，关闭。

4.同样的方法，将调整按钮2链接到单元格K2，然后在存储日期中设置公式：=2018-1-1K2，现在点击调整按钮2，存储日期将自动更改。 5、按ALT F11调出代码编辑器，插入一个模块1，双击模块1，打开代码窗口，插入一个进程：保存，输入下图中的代码，保存，关闭。

4、同样的方法，将调整按钮2链接到单元格K2，然后在入库日期中设置公式：=2018-1-1K2，现在点击调整按钮2，入库日期会自动改变.

5、按ALT F11调出代码编辑器，插入模块1，双击模块1，打开代码窗口，插入程序：保存，输入下图中的代码，保存，关闭。

5、按ALT F11调出代码编辑器，插入模块1，双击模块1，打开代码窗口，插入程序：保存，输入下图中的代码，保存，关闭。

5、按ALT F11调出代码编辑器，插入模块1，双击模块1，打开代码窗口，插入程序：保存，输入下图中的代码，保存，关闭。