一个朋友让我帮他处理一个Excel，对比两个Sheet中的字段，然后赋值。

我学过VB，但是对Excel的VBA编程还是第一次，然而代码都是一样的。

Sub GetMultNum()    For i = 8 To 12        For j = 2 To 171            If Sheet14.Cells(i, 3) = Sheet2.Cells(j, 3) And Sheet14.Cells(i, 2) = Sheet2.Cells(j, 2) Then                Sheet14.Cells(i, 6) = Sheet2.Cells(j, 4)            End If        Next j    Next iEnd Sub