Not sure what the issue is.. hopefully someone can help!!!
Heres my code:
Sub Test()
Dim SeriesName As Range
Dim LookupRange As Range
NumRows = Range("A1", Range("A1").End(xlDown)).Rows.Count
For x = 2 To NumRows
Set SeriesName = Series3.Range("A" & x).Value...