如下图所示，需要将A2:B9的内容，转变为D列的样子。

　　思考一下，有几种方法能实现呢?

　　1、VBA代码法

　　按Ctrl+F11，打开VBE编辑器，在代码窗口中写上以下代码：

　　Sub run()

　　For i = 1 To 8

　　Cells(2 + (i - 1) * 2, 4) = Cells(i + 1, 1)

　　Cells(3 + (i - 1) * 2, 4) = Cells(i + 1, 2)

　　Next i

　　End Sub

　　代码中使用For循环，执行单元格赋值操作。只要运行宏run，就可以得到需要的结果了。

　　2、函数公式法

　　D2单元格输入以下公式，向下复制。

　　=OFFSET(A$2,(ROW(A1)-1)/2,MOD(ROW(A1)-1,2))

　　OFFSET函数以A2单元格为基点，其行列偏移量使用公式生成的有规律的序列值。关于第二参数和第三参数的用法，可以在微信内容<我们一起学序号>有过介绍，这里就不再赘述了，有兴趣的同学可以点击查看一下。

　　3、技巧操作法

　　这是一组技巧的集合，方法很多，咱们看看几种有代表性的：

　　1、选择性粘贴法

　　2、对齐填充法

　　3、Word替换法

　　说明一下，Word替换时使用的 ^t 表示制表符，^p表示段落标记。也就是将制表符全部替换为段落标记。