excel - VBA - 根据条件更改单元格的值

Question

似乎是一个足够简单的问题，但我在这里找不到答案。去年我已经使用 StackOverflow 了，最后决定自己问一个问题，我相信有人知道答案!

情况:
我有一列具有唯一文件名的值，以及它们是否被处理。例如:“20160810_123_a.xml 已处理”或“20160810_123_b.xml 失败” 文件名的长度发生变化，因此它不是静态的。我在不同的报告中使用这些值，并且只想要“已处理”或“失败”的值，具体取决于原始内容中的内容。

我猜我需要某种 If 循环，它会做这样的事情:
在 I:I 范围内，如果单元格的值包含“已处理”，则将整个单元格替换为“已处理”。如果单元格的值包含“失败”，则将整个单元格替换为“失败”。

提前致谢!

Answer 1

尝试这个

Sub main()
    With Worksheets("Conditions") '<--| change "Conditions" to your actual data sheet
        With .Range("I1", .Cells(.Rows.Count, "I").End(xlUp)).SpecialCells(XlCellType.xlCellTypeConstants) '<--| change "I"s to your actual column index where to search for processed/failed
            .Replace what:="*processed*", replacement:="Processed", LookAt:=xlWhole, MatchCase:=False
            .Replace what:="*failed*", replacement:="Failed", LookAt:=xlWhole, MatchCase:=False
        End With
    End With
End Sub