VBA求解:行数未知,超10000行,想用VBA数组方式给对应的G列赋值,G列赋 ...答:Sub dd()Dim arr1, arr2, i As Longarr1 = [A2].Resize([A2].End(xlDown).Row - 1, 1)arr2 = [F2].Resize([A2].End(xlDown).Row - 1, 1)For i = 1 To UBound(arr1) If Left(arr1(i, 1), 2) = "61" And arr2(i, 1) = "库存" Then arr1(i, 1) = ...