Question

我想根据它的变化突出显示一个单独的单元格。下面的代码给我一个调试错误。我正在使用的范围是A7:AH500，如果这些单个单元格中的任何一个发生变化，则突出显示已更改的单元格。我也可以将它添加到模块中，还是必须直接在工作表上进行？

If Not Intersect(Target, Range("A7:AH500")) Is Nothing Or _
  Not Intersect(Target, Range("A7:AH500")) Is Nothing Then
    Target.Interior.ColorIndex = 3
End If

Answer 1

从其他线程完成此操作;

好的尝试一下 - 删除你刚刚添加到ThisWorkbook对象的内容。然后使用下拉菜单从左侧选择“Workbook”，从右侧选择“SheetChange”。它应该插入一些代码。在Sub内部（在End Sub代码之前） - 添加代码

Target.Interior.ColorIndex = 3

Answer 2

检测单元格中的更改的代码必须位于工作表中。执行任何所需更改的代码可以在模块中。

所以你可以在每张纸上（如果不止一张）：

Sub UpdateFormat(p_rngCell As Range)
    p_rngCell.Interior.ColorIndex = 3
End Sub

在模块中

$('div[mydata]').each(function() {
// `this` is the div
// $(this)
});

这样，您只需在多张纸上对实际逻辑进行一次更改。

根据细胞的变化突出显示个体细胞

2 个答案: