根据单元格中的特定条件格式化行答案

【问题标题】：Formatting a row according to specific criteria in a cell根据单元格中的特定条件格式化行
【发布时间】：2020-07-01 15:37:17
【问题描述】：

我的工作簿以“2020 年 6 月 30 日，星期二”等格式在最后一列 (J) 中显示一个日期表。有没有办法搜索该列中的每个单元格并突出显示特定行中的整行根据星期几的颜色？如果星期几是孤立的，但当它是日期字符串的一部分时，我的代码就可以工作。它突出显示单个单元格，但我希望它突出显示整行。除了名为“AllData”的工作表之外，我希望它适用于工作簿中的每个工作表

Sub FormatUsingVBA()
Dim rng As range
Dim lastRow As Long
Dim cell As range
lastRow = Cells(Rows.Count, 3).End(xlUp).Row
Set rng = range("J2:J" & lastRow)
For Each cell In rng
If cell.Value Like "Sunday" Then
range(cell.Address).Interior.ColorIndex = 3
Else
range(cell.Address).Interior.ColorIndex = 0
End If
Next cell
End Sub

【问题讨论】：

您需要 VBA 解决方案吗？你可以使用条件格式
是的，表格会更容易阅读，例如，如果我可以添加 vba 代码来选择“星期日”并将该行设为绿色。我对 VBA 很陌生，只是在寻找自己的方式
请edit您的问题并发布一些代码，以便我们可以为您提供特别的帮助

标签： excel vba formatting rows

【解决方案1】：

是的

例如选择 A 到 D 列
选择菜单：主页/条件格式
新规则
“使用公式确定要格式化的单元格”
输入公式：=$D1="Sunday
并将格式链接到它（例如绿色背景）（假设在 D 栏中您有“星期日”）

应用，D 列中值为 Sunday 的所有行都将显示为绿色。

【讨论】：