能不能告诉我下面的意思

能不能告诉我下面的意思Sub LKJL()Set d = CreateObject("scripting.dictionary")Set s2 = Sheets(1):Set s1 = Sheets(2)For i = 1 To s1.[a65536].End(3).Row##a65536是什么,(3) 是代表什么,如果是代列,是不是A/B/C-----uc = UCase(s1.Cells(i,1).Value)####UCase(s1.Cells(i,1).Value)需要翻译表英文列的取值吗?d(uc) = s1.Cells(i,2)NextFor j = 1 To s2.[a65536].End(3).Rowmc = UCase(s2.Cells(j,1).Value)If d.exists(mc) Then###这不是对比吧?如何知道是不是如需要翻译表中的英文是否相同s2.Cells(j,2) = d(mc)End IfNextSet d = NothingEnd Sub