自己写的函数，引用用户选择区域时有问题，请高手赐教！

yellow777

自定义函数，参数怎么引用用户选择区域的跨表地址呢？写的这个函数在同一张表计算是没有问题的，跨表有问题，应该是引用不到带工作表名称的地址，Sheet3!A1:E20，之前提问有说B_range.Worksheet.Name & "!" &  B_range.Address，这样是能提取带工作名称的地址，但在做find使用区域时不能使用，该怎么搞呢，请高手改一下，困惑好久了，有附件
Function wst(T_range As Range, B_range As Range)


  Dim what As String
  what = T_range.Value
  
  Set rng = B_range.Find(what, LookAt:=xlWhole)
   
  wst = Cells(rng.Row, 1).Value

End Function

yy6831817

这是用GPT改代码
Function wst(T_range As Range, B_range As Range)

  Dim what As String
  what = T_range.Value
  
  Set rng = B_range.Find(what, LookAt:=xlWhole)
  
  If Not rng Is Nothing Then
    wst = B_range.Worksheet.Cells(rng.Row, 1).Value
  Else
    wst = "Not Found"
  End If

End Function

半百