如何在字段中间查找文本字符串

Question

在字段中间查找文本

您好，我试图在字段的开头，中间，结尾或任何地方找到“轮胎”或“轮胎”或“轮胎”或“轮胎”，但似乎无法找到，代码仅当单词位于字段开头时，以下内容才有效

   If .Cells(K, "H").Value Like "*Tire*" Then
    J = J + 1
    .Rows(K).EntireRow.Copy Destination:=Worksheets("Tires").Range("A" & J + 1)
    .Rows(K).EntireRow.Delete
   End If

也在该行中...如果.Cells（K，“ H”）。Value，则H是我要搜索的列，那么K值是多少？

我感谢大家的帮助。