Extract data from cells based on cell reference

[ExcelRoy]

Hi all,

I am trying to extract all entries of data from a report dependant on a alpha numeric reference

THE LIST
Column B has the reference, which constantly changing entries and amounts
Column H has the part reference number in it

CA2 has the desired alpha numeric number to report

In CC2 I would like this to show the first part numer
in CC3 the next one
in CC4 next one

upto 50 entries if they are in the "LIST"

hope this makes sense

many thanks for any help

 

[Peter_SSs]

hope this makes sense

It doesn't to me. Any chance of a small set of dummy data and expected results with explanation in relation to that sample data?

 

[My Aswer Is This]

Try this:

Sub Search_Me()
'Modified 3-4-18 1:25 AM EST
Application.ScreenUpdating = False
Dim ans As String
Dim b As Long
Dim c As Range
Dim Lastrow As Long
Lastrow = Cells(Rows.Count, "B").End(xlUp).Row
b = 2
ans = Range("CA2").Value
    For Each c In Range("B1:B" & Lastrow)
        If c.Value = ans Then Cells(b, "CC").Value = c.Offset(0, 6).Value: b = b + 1
    Next
Application.ScreenUpdating = True
End Sub