- excel宏教程：职务排序，随心所欲~
- 利用Excel宏表函数取得工作表标签名称
- excel函数公式大全：利用Excel函数产生1－10 的自然数垂直序列和水平序列
- excel教程：连代码调试都一窍不通，还谈啥会VBA？
下面是给二维数组赋值，并将其写入单元格区域的参考过程：
Sub 使用二维数组存储数据()
Dim arr(1 To 11, 1 To 6) '存入数组的数据类型不确定，所以数组不指定类型
Dim Ir As Byte, Ic As Byte
'将数据逐个存入数组
For Ir = 1 To 11
For Ic = 1 To 6
arr(Ir, Ic) = Worksheets(1).Cells(Ir, Ic).Value
Next Ic
Next Ir
'将数组中数据逐个写入单元格
For Ir = 1 To 11
For Ic = 1 To 6
Worksheets(2).Cells(Ir, Ic).Value = arr(Ir, Ic)
Next Ic
Next Ir
End Sub
上一篇：表格制作excel教程：获取指定目录中所有扩展名为“xlsx'的文件名称 下一篇：excel宏教程：向未打开的工作簿中输入数
郑重声明：本文版权归原作者所有，转载文章仅为传播更多信息之目的，如作者信息标记有误，请第一时间联系我们修改或删除，多谢。
