标签: vba
我正在更新大型资产列表,我想根据部分文本匹配来更改行的样式。如果G列单元格中的文本包含所出售单词的任何变体,那么我希望整行都应用.Style =“ Bad”。
Sub SoldMachines() Dim c As Long For c = 1 To Rows.Count If Cells(i, 7).Value = "*Sold*" Then Cells(i, 7).Style = "Bad" End If Next c End Sub