VBA通过公式更改单元格值时自动运行宏答案

【问题标题】：VBA Automatically run macro when cell value is changed via formulaVBA通过公式更改单元格值时自动运行宏
【发布时间】：2018-09-05 08:00:41
【问题描述】：

在为我的工作簿使用宏方面需要帮助。基本上我有由另一个宏自动添加的行。每次添加新行时，对应的列都有一个 True/False if 公式。当单元格的“False”结果自动更新为“True”时，我希望同一行以某种颜色突出显示，并且仅此行。为了进一步解释，

Range("B3:K3") 是我希望在单元格 ("O3") 数据更改为 "True" 时突出显示的行
我有多行需要此宏在“O”列的特定单元格通过 If 公式从 False 变为 True 时自动运行
- 我还有另一个宏向列表中添加了额外的行，所以我不能使用条件格式

所以有时我希望 Range("B19:K19") 在单元格 ("O19") 自动更改时突出显示。需要注意的几点

我正在使用基本上链接到单元格 (“S11”) 的“自动刷新时钟”
换句话说，O 列中的单元格表示（如果 G 列中的相应单元格 [这是输入任务的日期] 与当前时间相比超过 24 小时（单元格“S11”），则更改值从 False 到 True。

我唯一的问题是，我似乎无法获得一个工作宏，它会突出显示 False/True 数据来源的行 [Range(B3:K3)] [列 O 上的相应单元格]。

谁能帮我解决这个问题？

编辑这是我想要完成的，但无法让它发挥作用。

Private Sub Worksheet_change(ByVal Target As Range) 
Dim Cl As Range
Dim R As Long
Set Cl = TargetAddress
R = Cl.Row

If Target.Address(, "O") = True Then
Target.Range("B" & R, Range("K" & R)).Interior.ColorIndex = 10
Else: Range("B5:K5").Interior.ColorIndex = 1
End If

结束子

【问题讨论】：

最好放一些样本数据，然后输出并解释逻辑以获得该输出。
您是否考虑过将 Target Cell 与 Worksheet_change 结合使用？还是您不知道如何更改颜色？这里有 2 篇关于这些主题的最新帖子，但您也可以搜索其他帖子。然后，正如harun24h 所说，提供样本数据会有所帮助：stackoverflow.com/questions/49442039/…stackoverflow.com/questions/49438998/…
条件格式？根据公式选择行和有条件的格式。如果约翰对此感兴趣，请告诉我，我会写一个更完整的答案。
如何利用worksheet_change 事件。当用户输入或 VBA 对工作表进行更改时，就会触发此操作。
@chrisneilsen well cpearson 另有声明：cpearson.com/excel/events.aspx

标签： vba excel

【解决方案1】：

我认为条件格式可以满足您的要求。

为简单起见，我假设您的工作表中只有 3 列和 10 行。 A 列是您要突出显示的列，C 列是具有真/假值的列。首先选择a1:a10，点击条件格式，然后点击新建规则。在下一个窗口中单击“使用公式确定要格式化的单元格”，然后在公式字段中键入 =C1=True。点击右下角的格式选择你需要的颜色，点击确定完成。

【讨论】：

给出更详细的解决方案。