假设取第一行10个数，其他类推： Dim ww(10) For i = 1 To 10 ww(i) = Cells(1, i) Next
严格的说，那不叫“在EXCEL中用VB编写程序”，只是用VBA写点函数而已。
