hi
I try writing short macro without using loop to match data between two sheets , but not succeeded so far .
Private Sub CommandButton1_Click()
Dim fnd As Range, sh1, sh2 As Worksheet
Set sh1 = sheet1
Set sh2 = sheet2
Set fnd = sh1.Range("o:o").Find(sh2.Range("B3").Value, LookIn:=xlValues, lookat:=xlWhole)
If Not fnd Is Nothing Then
sh1.Range("E" & fnd.Row) = sh2.Range("H" & fnd.Row) + 1
sh1.Range("P" & fnd.Row) = sh2.Range("I" & fnd.Row) + 1
sh1.Range("J" & fnd.Row) = sh2.Range("J" & fnd.Row) + 1
sh1.Range("F" & fnd.Row) = sh2.Range("K" & fnd.Row) + 1
End If
End Sub
so in sheet 2 I write the name in B3 . it should match with column O then should copy data from sheet 1 to sheet 2 ( E=H, P=I, J=J, F=K) . so I put the result in sheet 2 when write OMER in B3 then should match with the sheet1 and bring tha data
I hope this clear