VBA宏运行时错误＃13，你能帮我找到代码中的问题吗？

Question

我正在为excel转换宏，以便能够从我们的销售点导出我们的库存并导入到我们的新电子商务平台。我的宏的最后一部分是欺骗我（因为我不是VBA的专业人员），我需要交叉引用一列来确定该列中单元格的值，然后更改另一列中另一个单元格的值（在同一行）。所以，这是一个标准的if语句。以下是代码示例。

 If Range("F2:F" & Cells(Rows.Count, "F").End(xlUp).Row).Value = "AMP" And Range("G2:G" & Cells(Rows.Count, "G").End(xlUp).Row).Value = "10" Then
                Range("G2:G" & Cells(Rows.Count, "G").End(xlUp).Row).Replace What:="10", Replacement:="Acoustic Guitar"
            End If

因此，runtime error #13表示变量或属性的类型不正确。有人可以帮我指出未纠正的变量或财产吗？这最初对我有用，但现在给了我这个错误。谢谢你的时间，祝你有美好的一天！ -Paul

Answer 1

您的IF语句正在针对单个值测试多单元格范围，但这将失败。那么这样：

Sub dural()
    If Range("F2:F100").Value = "X" Then
        MsgBox "X"
    Else
        MsgBox "Y"
    End If
End Sub

如果要查找列 F 中哪个单元格的值 AMP ，则yo应使用 FIND（）语句。< / p>