Thank you Bernie Deitrick for helping me solve my excel VBA question and give me some ideal. Thanks again.. God bless you

I’m try to automated 3 excel file that can pull some data by using Find method. The coding succeeds. Below is the coding:-

Private Sub CommandButton2_Click()

Dim MyProduct As Range

For i = 5 To 100
Product = Cells(i, 6).Value 'Range("F8") = Cells(8, 6)
Set MyProduct = Workbooks("January KLM NPI ReviewIR.xls").Worksheets("Sheet1").Columns("E").F ind(what:=Product, LookAt:=xlWhole)
If Not MyProduct Is Nothing Then Cells(i, 8).Value = MyProduct.Offset(0, 4).Value
If Not MyProduct Is Nothing Then Cells(i, 17).Value = MyProduct.Offset(0, 6).Value
Next i

End Sub



This thread SOLVE