我有2本工作簿。在第一个工作簿(包含宏)中,我试图执行vlookup以确定第二个工作簿(tmp_workbook)的A列中是否存在strCompany值。
我收到以下VBA错误:
“无法获取WorksheetFunction类的Vlookup属性)”
Dim company_exists_in_list As Variant
Dim main_workbook As Workbook, tmp_workbook As Workbook
strCompany = main_workbook.Sheets("Input ID").Cells(10 + i + b * (j - 1), 3).Value
company_exists_in_list = Application.WorksheetFunction.VLookup(strCompany, tmp_workbook.ActiveSheet.Range("A1:A100000"), 1, False)
最佳答案
VLookup
在一行中使用,仅返回相同的值。您可以使用CountIf
来知道该值是否存在。
company_exists_in_list =Application.WorksheetFunction.CountIf(tmp_workbook.ActiveSheet.Range("A1:A100000"),strCompany)
如果该值不同于0,则该公司存在。
关于vba - 在vba中进行vlookup,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/36968139/