1、首先我们打开一个工作样表作为例子。
2、使用ALT+ F11 组合快捷键进入vbe编辑器，插入一个新的模块， 并在模块中输入以下代码：Option ExplicitSub 在单元格中输入数据()Dim i As IntegerFor i = 1 To 9Cells(i, 1) = iNext iEnd Sub图片中代码与文档中的代码一致。
3、我们先要定义变量i的类型，这里定义为整数型。并使用for循环让i变量取值范围为1to9依次运算。
4、每次i的赋值都会定义单元格的位置，cells为单元格定义函数，参数1为行，参数2为列。所以此函数訇咀喃谆将单元格定义为a1、a2、……a9，并将i值写入对应的单元格内。
5、next是终结for循环必须的结束语句，如果不写next，过程运行会报错。对应for语句的变量，next后也必须加上循环中的变量名称。
6、最终我们运行这段代码，可以在A1：钽吟篑瑜A9区域单元个内，得到1-9的数值，另外如果要横向得到代码，只需要在参数中修改对应的位置即可，我们还可以试一下全部使用变量定义单元格，会得到什么结果。
