如何在 vba 中突出显示行：示例

您可以在 VBA 中使用以下方法来突出显示线条：

方法 1：突出显示活动行

 SubHighlightActiveRow ()
ActiveCell.EntireRow.Interior.Color = vbYellow
End Sub

这个特定的宏将突出显示当前活动的行。

方法 2：突出显示特定行

 SubHighlightSpecificRow ()
Rows(" 4:4 ").Interior.Color = vbYellow
End Sub

这个特定的宏将突出显示当前工作表的第 4 行。

方法 3：突出显示多个特定行

 SubHighlightSpecificRows ()
Range(" 2:2,4:4,6:6,8:8 ").Interior.Color = vbYellow
End Sub

这个特定的宏将突出显示当前工作表的第 2、4、6 和 8 行。

注意：要突出显示 2 到 8 之间的所有行，您可以键入Range(“2:8”) 。

以下示例展示了如何在实践中使用每种方法。

示例 1：突出显示活动行

假设当前选择了单元格B3 。

我们可以创建以下宏来突出显示当前活动行中的每个单元格

 SubHighlightActiveRow ()
ActiveCell.EntireRow.Interior.Color = vbYellow
End Sub

当我们运行这个宏时，我们会收到以下输出：

请注意，第三行中的每个单元格都突出显示，所有其他行保持不变。

示例 2：突出显示特定行

假设我们只想突出显示第四行。

我们可以创建以下宏来执行此操作：

 SubHighlightSpecificRow ()
Rows(" 4:4 ").Interior.Color = vbYellow
End Sub

当我们运行这个宏时，我们会收到以下输出：

请注意，第四行中的每个单元格都突出显示，所有其他行保持不变。

示例 3：突出显示多个特定行

假设我们要突出显示当前工作表的第 2、4、6 和 8 行。

我们可以创建以下宏来执行此操作：

 SubHighlightSpecificRows ()
Range(" 2:2,4:4,6:6,8:8 ").Interior.Color = vbYellow
End Sub

当我们运行这个宏时，我们会收到以下输出：

请注意，第 2、4、6 和 8 行均突出显示，所有其他行保持不变。

注意：在每个示例中，我们选择使用黄色 (vbYellow) 作为突出显示颜色，但您可以选择不同的颜色，例如 vbRed、vbGreen、vbBlue 等。

其他资源

以下教程说明如何在 VBA 中执行其他常见任务：

VBA：如何突出显示单元格
VBA：如何对单元格应用条件格式
VBA：如何将条件格式应用于重复值