Range门类的数据能否作为参数传递
Range类型的数据能否作为参数传递？
在sheet中查找指定的内容，在函数A中找到这个cell之后希望将找到的这个range作为参数传递给另外一个函数B，让B函数来分析Range所在的行列值、是否合并的属性，现在发现将找到的这个range传递给函数B时发生崩溃。
高手们知道range如何作为参数进行传递么？
'A
Function A(wsSheet As Worksheet) As Boolean
Set oRange = wsSheet.Cells.Find(What:=EXL_ELEMANTNAME, LookAt:=xlWhole)
B (oRange)
End Function
'B
Function B(oRange As Range)
curcol = oRange.row
End Function
------解决方案--------------------
调用函数B时使用call
Call B (oRange)
在sheet中查找指定的内容，在函数A中找到这个cell之后希望将找到的这个range作为参数传递给另外一个函数B，让B函数来分析Range所在的行列值、是否合并的属性，现在发现将找到的这个range传递给函数B时发生崩溃。
高手们知道range如何作为参数进行传递么？
'A
Function A(wsSheet As Worksheet) As Boolean
Set oRange = wsSheet.Cells.Find(What:=EXL_ELEMANTNAME, LookAt:=xlWhole)
B (oRange)
End Function
'B
Function B(oRange As Range)
curcol = oRange.row
End Function
------解决方案--------------------
调用函数B时使用call
Call B (oRange)