多转置粘贴到单列 Excel

Multi Transpose Paste into Single Column Excel

我在 Excel 中有一组列,我想将它们重组为一个长列表。这个想法是获取第 1 行中的所有实例(即 A1, B1, C1, D1 等)并将它们放入新 sheet 中新列的 运行 列表中。这很简单,问题是我有几行我想重新格式化。我想要的是:

Row 1: A1, B1, C1
Row 2: A2, B2, C2
Row 3: A3, B3, C3
etc..

最终出现在单列的长列表中,例如:

Column 1: A1, B1, C1, A2, B2, C2, A3, B3, C3.

我在这里处理大约 300 行条目,每个条目大约 8 列,因此手动复制-粘贴-转置解决方案将是我最后的选择。我觉得可能有一个智能宏解决方案,但我不精通宏。

从录制宏开始。尽可能多地使用键盘来编写动态代码(至少选择单元格和范围)。它会是这样的:

  1. Select 两个 sheet 中的单元格 A1。转到第一个 sheet(有行)
  2. 开始录制宏
  3. 按 Ctrl+Shift+Arrow_Right
  4. Ctrl+C
  5. 改变sheet
  6. 在所选单元格中粘贴转置
  7. 改变sheet
  8. 按Arrow_Down
  9. 按 Ctrl+Shift+Right_Arrow
  10. Ctrl+C
  11. 改变sheet
  12. 按 Ctrl+Arrow_Down
  13. 按Arrow_Down
  14. 在所选单元格中粘贴转置
  15. 前往第 7 点

几行后您可以停止记录,检查生成的代码,学习一些关于 VBA 中的循环的知识并完成您的代码。祝你好运。