Excel在行字段之间插入数据

我在下面创build了一个样例表，这与模拟我所面临的情况非常相似。 我需要一个Excel VBA代码或可以使用公式完成？
当前表

column1 | ------------ A | A | A | B | B | C | D | D | 

期望的结果

 column1 | ------------ A | go | A | go | A | go | B | go | B | go | C | go | D | go | D | 

Answer 1

公式的方法

 =IF(ISODD(ROW(A1)),INDEX(A:A,CEILING(ROW(A1)/2,1)),"go") 

根据需要复制下来。 然后可以复制结果列并使用“select性粘贴”>“值”将其粘贴到自身上，然后删除原始列。

说明 ：从里到外阅读公式。 Row(A1)将返回数字1.除以2返回0.5，使用天花板返回下一个完整整数，即1.复制到第3行，例如， Row(A3)返回3，除以2 = 1.5，下一个满的整数返回2。

因此，在第1行中，公式评估为Index(A:A,1) ，这意味着“返回范围A：A中的第一个单元格”。 在第3行的公式评估Index(A:A,2)这意味着 – 你明白了！ 在第5行，我们将得到Index(A:A,3)等等。

通过“公式”function区上的“评估公式”工具运行公式，以查看逐步执行的这些操作。