如下图所示,需要将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表示段落标记。也就是将制表符全部替换为段落标记。