商品调拨Excel小工具：自动复制整行内容

调拨是服装业商品管理人员的常规工作。所谓调拨是将货品在门店之间或者门店和物流中心之间按照一定规则进出的过程。比方，将畅销品从销售不好的店铺调拨到销售好的店铺，将断码产品集中到一个店铺，将旧货下沉到折扣通路等等。

在Excel调拨作业过程中，可能会遇到以下问题：物流中心或者某店铺有某款商品，库存数量比较多，需要拆分调拨给N家店铺。

这时，需要将该货品复制N行，分别输入不同的调入方和调拨数量。

问题是需要拆分的款式不止一个，可能成百上千，手工作业显得繁琐，我写了个小工具，鼠标只要放在需要复制的行的任意位置，按下自定义的快捷键（我的是Ctrl+ｚ），就可以快速复制，想要复制多少行就按多少次快捷键。

复制使用的是插入模式，不会覆盖下方的内容：

点开开发工具-VB，插入以下代码：

Sub 插入行()
Dim i
i = ActiveCell.Row
Rows(i).Copy
Rows(i).Insert
End Sub

并为该代码设置一个快捷键：

保存后即可重复使用。

案例文件下载：https://mianbaoduo.com/o/bread/YZ2blp1u