VBA 自定义函数，参数设置问题

自定义函数，取引用单元格或字符串中间的第2个“-”号的值，第那么在参数的类别中怎么输呢？
function lianxi(rng1 as ??,参数二，参数三）
有两个问题：
1、参数一的变量类型怎么定
2、我如何区分，第一个参数输入的是字符还是单元格引用？比如说 A12，到底是单元格还是字符串呢？

1、类型是string
2、如果你输入的是A12就是单元格引用，也就是引用此单元格的值，如果你输入的是"A12"就是字符串本身了。

对于这种情况，请用过程调用实现。 要用到4个参数：要输入公式的第一个单元的行与列、最后的行、被引用的值的列， 对此可以设定此4个参数为h1、h2、l1、l2，分别对应：在输入公式的单元的行值、被填充的行值、被引用的单元的列值、公式所在的列值 则该过程可以这样写： sub c1(h1, h2, l1, l2) dim a, b if l1 > 26 then a = chr(int(l1 / 26) + 64) & chr(l1 - int(l1 / 26) * 26 + 64) else a = chr(l1 + 64) end if if l2 > 26 then b = chr(int(l2 / 26) + 64) & chr(l2 - int(l1 / 26) * 26 + 64) else b = chr(l2 + 64) end if cells(h1, l2) = "=if(" & a & h1 & "<>""""," & a & h1 & "," & b & h1 - 1 & ")" cells(h1, l2).select selection.autofill destination:=range(cells(h1, l2), cells(h2, l2)), type:=xlfilldefault end sub 之后在主模块中用call c1（参数）调用就可以了，当然，4个参数均为数值型的