列到行（形成新行）

Question

试图弄清楚如何在其前面的行下提取列

在图像中，我想要的是在6以下，我可以添加另一行并将D6的数据以同样的方式放置到E6。类似地，在12the行下，我可以再添加2并为D12和E12添加数据F12和G12 ..

请注意，A列中的数字是重复的。.而不是我有名字的数字..也有1000多个行和大约50列..

Answer 1

在For / Next循环中从下至上遍历各行。对于每一行，找到最右边的列。在基于先前的“最后一列”大于3的嵌套Do While / Loop中，在当前行下插入新行，并用A列中的值和当前行中的最后两个日期填充它。清除当前行的最后两个日期，并检查“最后一列”是否仍大于3。如有必要，重复行插入和值传递。最后，移至上一行并继续处理。