Question

我最近添加了一个宏来添加Sheets中的选择（“Activities”）并将其插入位于Sheets（“EP2”）第25行的新行。 - 从而在表格中添加新的预先写好的“活动”。

表格（“活动”）中有许多不同的选择（预先写好的活动）已经分配了自己的按钮。

按下按钮时，表格（“活动”）中的相应选择将插入相同的位置（表格上的第25行（“EP2”））

这意味着每次添加其他活动时，最后一次添加都会向下移动。这一切都很好。

但是，我想添加重合按钮然后删除某些活动（来自Sheets（“EP2”）稍后。这会产生一个问题，因为当某个活动被添加到工作表时它可能不一样单元格引用，就像第一次通过宏添加一样。有没有办法解决这个问题？

基本上，这个表格必须适用于几乎不了解excel的人，只需点击一下按钮即可添加这些预先写好的活动，然后只需点击一下按钮就可以删除。我使用的代码如下..

Sub Insert_CV()

Dim Answer As VbMsgBoxResult

Answer = MsgBox("Are you sure you want to insert a CV agreement" & vbNewLine & "This cannot be undone.", vbOKCancel, "CV Agreement")

If Answer = vbOK Then

    Sheets("Activities").Select
    Rows("1:4").Select
    Selection.Copy
    Sheets("EP2").Select
    Rows("24:24").Select
    Range("C24").Activate
    Selection.Insert Shift:=xlDown
    Range("D20:U20").Select

End If

End Sub

感谢您的帮助

Excel宏删除已通过另一个宏

0 个答案: