如果另一个单元格的值等于同一行中的特定值,则连接现有单元格



我有一个表,看起来像这样:

A           B
NAME        CONDITION
NAME 1      POOR
NAME 2      GOOD
NAME 3      GOOD
NAME 4      POOR

我想检查B2下面所有的"POOR"并在A2的VALUE之前添加一个星号,这是可能的,所以它会像这样改变:

A           B
NAME        CONDITION
*NAME 1     POOR
NAME 2      GOOD
NAME 3      GOOD
*NAME 4     POOR

您想要的更改需要VBA宏。不能通过公式更改同一单元格中的值。试试下面的宏。

Sub AddStar()
Dim cel As Range
For Each cel In Sheets("Sheet1").Range("A2:A" & Cells(Rows.Count, "A").End(xlUp).Row)
If cel.Offset(, 1) = "POOR" Then
cel = "*" & cel
End If
Next cel
End Sub

相关内容

  • 没有找到相关文章

最新更新