rank函数的第二个参数出错

buciyuan

Function pw(a, b, c)
Dim x
Dim rng As Variant
rng = Array(a, b, c)
   x = Application.WorksheetFunction.Rank(a,rng,1)
pw = x
End Function  


请教各位大神，rng = Array(a, b, c) 作为rank函数的第二个参数似乎不行，敬请指点一二，谢谢！

TuskAi

参数要求是range类型

buciyuan

参数是三个单元格，这三个单元格参数怎么连接成一个单元格区域，请教各位！