Vba Excel宏删除通过另一个宏添加的行

Vba Excel宏删除通过另一个宏添加的行,vba,excel,Vba,Excel,我最近添加了一个宏来添加从工作表(“活动”)中选择的内容,并将其插入到工作表(“EP2”)第25行的新行中因此,在工作表中添加了新的预先编写的“活动” 从指定了自己按钮的工作表(“活动”)中有许多不同的选择(预先编写的活动) 按下按钮时,从工作表(“活动”)中选择的适当内容将插入相同位置(工作表(“EP2”)第25行) 这意味着每次添加另一个活动时,最后添加的内容都会向下移动页面。这一切都很好 但是,我想添加重合按钮,以便在以后删除某些活动(从工作表(“EP2”)。这会造成问题,因为当将某个活动

我最近添加了一个宏来添加从工作表(“活动”)中选择的内容,并将其插入到工作表(“EP2”)第25行的新行中因此,在工作表中添加了新的预先编写的“活动”

从指定了自己按钮的工作表(“活动”)中有许多不同的选择(预先编写的活动)

按下按钮时,从工作表(“活动”)中选择的适当内容将插入相同位置(工作表(“EP2”)第25行)

这意味着每次添加另一个活动时,最后添加的内容都会向下移动页面。这一切都很好

但是,我想添加重合按钮,以便在以后删除某些活动(从工作表(“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

感谢您的帮助

您可以使用代码删除当前选定单元格的行。如果要手动删除该项目,您将如何(一步一步)执行此操作?这是一个需要自动化的过程,但您的帖子中没有足够的信息来建议应该是什么样子。感谢大家的关注。我发现,无论在工作表中添加了什么其他行,范围名称都会跟随插入的项目。这意味着我编写了一些代码,将插入的行重命名为它们自己的range。完成此操作后,我可以在需要时编写另一个子项来删除新命名的区域。这可能需要很长的时间,但到目前为止对我有效。再次感谢您可以使用代码删除当前选定单元格的行。如果要手动删除该项,您将如何(一步一步地)执行此操作?这是一个需要自动化的过程,但您的帖子中没有足够的信息来建议应该是什么样子。感谢大家的关注。我发现,无论在工作表中添加了什么其他行,范围名称都会跟随插入的项目。这意味着我编写了一些代码,将插入的行重命名为它们自己的range。这样做之后,我可以在需要时编写另一个sub来删除新命名的范围。这可能是一个很长的过程,但到目前为止它对我有效。再次感谢