I have a search that Identifies a range address with a specific header that works.
The function I am working on needs to search in the same row for another header string and return the cell address.
For some reason the find function does not populate the range variable with the address of the header in the file.
I have tried adjusting parameters in the find function but I am not having any luck figuring this out.
Thanks in advance for your help!
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