怎么将vba一维数据导出到excel

1、打开Excel数据表，如下图所示。

2、按下Alt+F11组合键，打开VBA编辑界面，双击左侧要导入数据的工作表，弹出右侧空白代码编辑区，如下图所示。

3、输入代码：

Sub 鱼木混猪()

Dim a(7)

For i = 1 To 7

a(i - 1) = Int(Rnd() * 100)

Next i

代码先定义一个一维数组，然后利用循环将随机数字放入到数组中，如下图所示。

4、继续输入代码：

For i = 0 To 6

Range("B" & i + 2) = a(i)

Next

End Sub

代码是再次利用循环将一维数组中的数字挨个放入到指定单元格中，如下图所示。

5、点击上方的“运行子程序”按钮，返回Excel中，就可以看到一维数组中的数字就导出到了Excel单元格中，如下图所示。

1、1.打开Excel数据表；

2.按下Alt+F11；

3.输入代码，生成一维数组并放入随机数字；

4.利用循环将数组数字导出到Excel单元格中；

5.点击“运行子程序”，就在Excel中看到了导出后的数据。