如何在Excel工作表中创建一个按钮，将其在工作表下面的相应部分复制并粘贴到该工作表中

Question

我为我的公司创建了一个Excel工作表，我们用它来计算产品的价格。 我们不是大批量生产的公司。 每周我们会收到25或30个新项目，这些项目可能包含1到50个单独的部分，每个部分可能是2到3个。

因此，在此excel工作表模板中，我复制并粘贴了大约10个相同的东西，这是单个装配件的不同计算的一大组。

这是单个装配组的外观：

您会看到有3个钣金零件，3条挤出生产线，3个已购买的零件等...

我需要几个按钮。 也许在装配组的标题上，也许在每个部分的底部。

该按钮只需要插入其中一个部分的另一个新的空白副本。 因此，如果单击“添加钣金”按钮，则会在最后一个钣金部分下添加一个新的空白钣金部分，并将其余的钣金向下推。

我已经寻找了几个月的方法来做到这一点。 复制和插入复制的单元有时会出错，因为总计和引用有时会弄乱。

有人知道怎么做吗？

Answer 1

这是一个示例宏，可以满足您的需求。 本示例假定要复制的数据在单元格A3至E4中，但是您可以将其更改为与您相关的单元格。

Sub InsertSection()
    Range("A3:E4").Select  ' change this to the cells relevant to you
    Selection.Copy
    Selection.Insert Shift:=xlDown
End Sub

然后，您可以将此宏分配给按钮。 这是使用我创建的按钮的代码：

当您单击按钮时，宏将执行以下操作：