与给定范围地址的同一行中查找字符串值

Question

我有一个搜索，可以通过有效的特定标头标识一个范围地址。

我正在处理的功能需要在同一行中搜索另一个标头字符串并返回单元格地址。

由于某种原因，查找函数不会在文件中使用标头的地址填充范围变量。

我尝试调整查找功能中的参数，但我没有任何运气来解决这个问题。

事先感谢您的帮助！

Private Sub FindAllHeadersInRow(dataFile As String, rng As String, headerName As String)
MsgBox "Finding all headers in the selected row"
'search left in the given row to find other header to copy data from under
Dim HeaderColFoundRng As Range
Dim dataWB As Workbook
Set dataWB = Workbooks.Open(dataFile)
Set HeaderColFoundRng = dataWB.Sheets("Sheet1").Range(rng).Find(What:=headerName, LookIn:=xlValues, _
    LookAt:=xlWhole, SearchDirection:=xlPrevious) 'or xlNext
    'needs to set each value address to a range that will be sent out
    
    MsgBox HeaderColFoundRng.Address  '<<< repeated variable not set error!
        
End Sub

Sub testSub2()
Dim FileToOpen As String
FileToOpen = Application.GetOpenFilename(Title:="Select Data file")
Call FindAllHeadersInRow(FileToOpen, "A68:AZ68", "Transaction Date") 'Header needed is located in T68
End Sub