Nhờ các anh/chị giúp như file đính kèm. Xin cám ơn
Vẫn còn cách nè:Cảm ơn hai anh/chị bactu và Let'GâuGâu. Cả hai cách đều OK.
Sub abc()
Dim i%, j%
For i = 3 To 9
For j = 5 To 10
If Cells(i, 4) = Cells(2, j) Then
Cells(i, 13) = Cells(i, j)
End If
Next
Next
End Sub