首页 > 解决方案 > VBA Vlookup 函数

问题描述

当我运行这段代码时,我不断收到这个错误,说对象不支持属性或方法。

任何想法如何让它工作?

If ActiveCell.Value <> WorksheetFunction.VLookup(ActiveCell.Offset(0, 1), Workbooks("Log.xls").Worksheets("Log").Range("A:B"), 2, False) Then
    [f2].Value = vvvv

End If

标签: excelvbavlookup

解决方案


尝试这个:

If ActiveCell.Value <> Application.VLookup(CStr(ActiveCell.Offset(0, 1)), Worksheets("Sheet1").Range("A:B"), 2, False) Then
        [f2].Value = vvvv

End If

更多细节:您必须在 VLOOKUP 函数中控制查找值的类型


推荐阅读