Question

excel vba中运行时显示错误为1004，请哪位大神帮忙看一下~

我想实现模糊查找，并在F列输出查到的内容

Answer 1

想不明白你为什么会这样写

简简单单用FOR不行吗

Sub test()
myrow = Range("A65536").End(xlUp).Row
For i = 1 To myrow
    If InStrRev(Range("A" & i), "钢铁") > 0 Then
        Range("F" & i) = Range("A" & i)
    End If
Next
End Sub