| 查看: 361 | 回复: 0 | |||
ujqt007金虫 (正式写手)
|
[求助]
求大神指点：利用VBA Calculate跟踪记录单元格变化，不知道哪里出错了？
|
|
详情如下 某特定单元格数据发生了变化，该变化并非人为更改而是通过公式计算得出的，想通过VBA Calculate跟踪记录其变化 Private Sub Worksheets_Calculate(ByVal Target As Range) If Not sheet.Intersect(Target, [A1]) Is Nothing Then Application.EnableEvents = False y = Sheets(2).Columns(1).Find("*", , xlValues, , , 2).Row Sheets(2).Range("A" & y + 1) = Sheets(1).Range(" A1" ).Value Sheets(2).Range("A1" ) = "" End If Application.EnableEvents = True End Sub 运行发现，表1中A1发生变化时，表2中没反应，不知道哪里出错了？ [ Last edited by ujqt007 on 2013-4-29 at 15:35 ] |
回复此楼» 猜你喜欢
存款400万可以在学校里躺平吗
已经有37人回复
-
英文综述是否需要润色及查重
已经有5人回复
-
救命帖
已经有5人回复
-
限项规定
已经有5人回复
-
为什么nbs上溴 没有产物点出现呢
已经有9人回复
-
招博士
已经有3人回复
-
最失望的一年
已经有18人回复