[已解决]Excel VAB数组问题

xinxn920310

求助大神，怎样把包括L列及以后的99列数据分别代入B列，同时分别在J列输出I4的值，再详细点描述就是，一列数字对应一个均匀度值，共100个，按列显示在J列，谢谢大神了，好评

最佳答案

月排行榜 / 总排行榜

grf1973

2017-9-25 11:00

1. Private Sub CommandButton1_Click()
   
2.     r = [a65536].End(3).Row
   
3.     [J2:J65536] = ""
   
4.     For j = 12 To 111
   
5.         n = n + 1
   
6.         [b2].Resize(r - 1) = Cells(2, j).Resize(r - 1).Value
   
7.         Cells(n + 1, "J") = [I4]
   
8.     Next
   
9.     [b:b] = ""
   
10. End Sub

复制代码

跳转到最佳答案楼层