Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$B$1" And [A1].Value > [B1].Value ThenTarget.Interior.ColorIndex = 3 ElseTarget.Interior.ColorIndex = xlNone End If End Sub

轉(zhuǎn)自EXCELHOME論壇，很實用的事件觸發(fā)器，在此記下備忘。

轉(zhuǎn)載于:https://www.cnblogs.com/luoye00/p/10863572.html

總結(jié)

以上是生活随笔為你收集整理的改变单元格内容触发事件（转）的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。