循环检查字母X的单元格范围,遮挡该行中的相邻单元格

我想循环遍历检查字母X的一系列单元格。如果有一个XI希望将列中的单元格与该范围内的X单元格相对应的单元格的左侧和右侧。 我从来没有使用条件格式,看看,但我不认为这是行得通的。 我相信我将需要.Offset,但我不知道如何使用它。 以下是我的代码。

Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Not Application.Intersect(Target, Me.Range("D14:K19")) Is Nothing Then For Each Cell In Range("D14:K19") If ActiveCell.Value = "x" Or ActiveCell.Value = "X" Then ActiveCell.Offset( End If Next Cell End If Application.EnableEvents = True End Sub 

我将假设你的意思是右边/左边的列而不是行。 如果你的意思是上面/下面的行,情况会有所不同。

为了回答你的问题, ActiveCell.Offset(0, -1)会给你活动的左边的单元格。 即相同的列和左侧的1个单元格(或者更正确地说,右侧是-1 …)。 以同样的方式, ActiveCell.Offset(0, 1)将使单元格在活动单元的右侧。

但是,您将需要用CellreplaceActiveCell每个实例,因为这是循环的。