Tag: 显示隐藏

Excel VBA隐藏基于单元格颜色的行，如果命令显示“是”

我试图根据两个标准来隐藏行： 准则1：如果单元格Q3的值为“是”，则隐藏符合条件2的单元格 标准2：如果列A中的单元格是RGB（253,233,217）的颜色，则隐藏整行。 从本质上讲，我有一个跟踪每天电子邮件数的日子列表，我想隐藏任何周末，所以他们不显示在显示趋势图。 我正在把自己的上司弄糊涂了，所以他们只需点击单元格Q3中的“是”或“否”来隐藏周末行。 周末是浅橙色（上面列出的RGB代码）。 如果单元格Q3表示“否”，则所有行都将取消隐藏/保持不被隐藏也是重要的。 我现在的代码是： Sub HideRows() BeginRow = 1 EndRow = 1000 ChkCol = 1 ChkCommCol = 17 For RowCnt = BeginRow To EndRow If Cells(RowCnt, ChkCommCol).Value = "Yes" Then If Cells(RowCnt, ChkCol) = RGB(253, 233, 217) Then Cells(RowCnt, ChkCol).EntireRow.Hidden = True Else Cells(RowCnt, ChkCol).EntireRow.Hidden = False If Cells(RowCnt, ChkCol).EntireRow.Hidden = […]