| 查看: 371 | 回复: 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 ] |
回复此楼» 猜你喜欢
求调剂
已经有3人回复
-
材料277求调剂
已经有7人回复
-
数一英一271专硕（085401）求调剂，可跨
已经有5人回复
-
291求调剂
已经有21人回复
-
一志愿哈尔滨工业大学材料与化工方向336分
已经有8人回复
-
药学105500求调剂
已经有3人回复
-
考研调剂
已经有4人回复
-
0703化学
已经有7人回复
-
学硕274求调剂
已经有6人回复
-
321求调剂
已经有6人回复
