Public Function FANYI(C As Range)
Dim data As Range
Set data = Worksheets(2).Range("a:c")
FANYI = Application.WorksheetFunction.VLookup(C, data, 2, 0)
End Function
date 如果是range就是一个对象,那么赋值的时候就需要set
新手慢慢来吧!
data = Worksheets(2).Range("a:c") 这句改成
Set data = Worksheets(2).Range("a:c") 看看可以不