[已解决]高手快来呀，等待中，这回我上传附件了，帮我看看吧？

心想事成 · 发表于 2010-1-28 21:23

Private Sub Worksheet_Change(ByVal Target As Range)
    If Cells(16, 9) > 1000 Then
        MsgBox "恭喜你已经突破1000了"
    End If
End Sub

我回帖没有人理我，汗，只能在发帖求助了，我有两个工作表，第一个工作表是进行计算的，第二个工作表是运行结果的，这个代码在第二个工作表里，为什么在第一个工作表里计算，当第二个工作表 I16>1000时，第一个工作表不给我提示，而在第二个工作表里点击任意一个单元格才会出现提示，而且也不是自动的出现。这是问题一

问题二是，我设置的是 I16>1000的时候提示，怎么在 I16<1000的时候，它也提示呀？不明白，有点乱。

UNwCc40v.rar (17.72 KB, 下载次数: 0)

喜多多 · 发表于 2010-1-28 21:26

I6是不是文本格式？

和气生财 · 发表于 2010-1-28 21:28

上传附件，，，，

心想事成 · 发表于 2010-1-28 21:30

I16上的代码是 =SUM(L4:L15)&"元" 这个，有关系吗？是不是多了个元的缘故？

和气生财 · 发表于 2010-1-28 21:34

公式的值发生变化的确不会触发worksheet_change 事件。。。

心想事成 · 发表于 2010-1-28 21:38

那怎么才能叫他满足条件后自动触发那？

枯禅 · 发表于 2010-1-28 21:55

不知道在讨论什么，但估计和这个有点关系：

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

End Sub

心想事成 · 发表于 2010-1-28 21:56

怎么都说一半话呀，真晕

枯禅 · 发表于 2010-1-28 21:59

QUOTE:

以下是引用心想事成在2010-1-28 21:56:00的发言：
怎么都说一半话呀，真晕

啥都没有，谁能猜得出你具体要干啥

和气生财 · 发表于 2010-1-28 22:00

是可以的，不过比较麻烦。

等高手来吧，，，，哈哈

		自动登录	找回密码
密码			注册