Excel如何用VBA代码自动删除多余记录,只保留每个学员的最好成绩?答:Sub nn()Dim arr, brr, crr, r, i, j, zd As Object, m, n r = [a65536].End(3).Row arr = Range("a2:g" & r)Set zd = CreateObject("scripting.dictionary")For i = 1 To UBound(arr)arr(i, 5) = Val(Application.Substitute(Application.Substitute(arr(i, 5), "'", ...