我在workbook.say sheet1和sheet2中有2张。如果我假设我在第1行的第1行插入一个空行,那么它应该在第2行的第8行中自动添加一个空行。
同样适用于删除。 Sheet1将由用户使用,sheet2将对用户隐藏。
如果用户从sheet1删除一行,那么它应该在sheet2中重新选择,这就是我想要的。
我可以使用宏吗?
如何实现这一目标?
提前致谢...
答案 0 :(得分:0)
我会用这样的东西
Private intPrevRows As Integer
Private Sub Worksheet_Activate()
intPrevRows = UsedRange.Rows.Count
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If UsedRange.Rows.Count < intPrevRows Then
MsgBox "deleted"
ElseIf UsedRange.Rows.Count > intPrevRows Then
MsgBox "added"
End If
intPrevRows = UsedRange.Rows.Count
End Sub