Hi Team,
Vlookup is not working , getting below error. In my Input file sheet name has Single quotation (Today's File)
I am getting error as application defined or object defined error.
plz help how to fix it. below is attempted code one with recorded which works. Thanks.
Thanks
mg
Vlookup is not working , getting below error. In my Input file sheet name has Single quotation (Today's File)
I am getting error as application defined or object defined error.
plz help how to fix it. below is attempted code one with recorded which works. Thanks.
VBA Code:
Sub Vlookup()
Dim data_wbk As Workbook
Set data_wbk = Workbooks.Open(ThisWorkbook.Worksheets("Sheet1").Range("d3").Value)
Dim data_sht As Worksheet
Set data_sht = data_wbk.Worksheets("Today's File")
With ThisWorkbook.Worksheets("Sheet1").Range("b2:b5")
'changed variables. 'getting error as application defined or object defined error.
.FormulaR1C1 = "=VLOOKUP(RC[-1],'[" & data_wbk.Name & "]" & data_sht.name & "'!C1:C11,MATCH(""Score"",'[" & data_wbk.Name & "]" & data_sht.Name & "'!R1C1:R1C8,0))"
'Recorded Code which works
.FormulaR1C1 = "=VLOOKUP(RC[-1],'[Todays''s File .xlsx]Today''s File'!C[-1]:C[11],MATCH(""Score"",'[Todays''s File .xlsx]Today''s File'!R1C1:R1C8,0))"
End With
End Sub
Thanks
mg