如何将行插入另一张工作表的列中？答案

【问题标题】：How to insert rows into columns from another sheet?如何将行插入另一张工作表的列中？
【发布时间】：2016-01-31 09:31:39
【问题描述】：

我正在尝试用这样的列中的重复数据预填充模板：表 1：

A1
Offer Name:
Offer URL:
Network:
Payout $:
Share%:

Offer Name:
Offer URL:
Network:
Payout $:
Share%:

...

我想做的是从 Sheet2 插入数据，它是连续的：Sheet2：

A1      B1      C1          D1  E1
name1   link1   network1    1   5%
name2   link2   network2    1   5%

并像这样预填充 Sheet1：

A1          B1
Offer Name: name1
Offer URL:  link1
Network:    network1
Payout $:   1
Share%:     5%

Offer Name: name2
Offer URL:  link2
Network:    network2
Payout $:   1
Share%:     5%

所以我可以将填充物向下拖动到 Sheet1 中，让它预填充与 Sheet2 中一样多的内容。我尝试过连接，但公式不起作用。

可以用公式吗？

【问题讨论】：

Paste-special transpose 会让你接近，但如果你想要你所描述的，你需要一点 VBA。如果您愿意使用它（VBA），那么任务应该没什么大不了的。
是的，谢谢，如果可能的话，我会尽量避免使用脚本，所以我将来可以使用更简单的东西。

标签： excel excel-formula offset worksheet-function

【解决方案1】：

假设 Sheet1 在 A1 中以 Offer Name: 开头，name1 在 Sheet2 A1 中，请尝试在 Sheet1 B1 中复制以适应：

=OFFSET(Sheet2!A$1,INT(ROW()/6),MOD(ROW()-1,6))

您可以通过选择 A1:A12 并向下拖动填充手柄来填充 Sheet1 ColumnA。如果需要从 B6、B12 等中删除 0，则过滤 ColumnA 以选择 (Blanks) 并删除零。如果需要，也可以使用过滤器来格式化百分比。

【讨论】：

pnuts 这太棒了，谢谢。我想不通。真的行。只有一件事，是否可以在复制时插入空白单元格而不是每 6 行中插入 0 值？

【解决方案2】：

如果您喜欢保持 Sheet1 垂直排序，同时仍然垂直列出您的字段，那么您将不得不留出一些余量。就像 Hambone 建议的那样，这将在 VBA 中更严格地完成。如果您仍然喜欢只使用公式，这里是一个潜在的解决方案。对于 Sheet1 中的每个行项目，您将使用以下公式：

="Offer Name: "&Sheet2!A1&CHAR(10)&"Offer URL: "&Sheet2!B1&CHAR(10)&"Network: "&Sheet2!C1&CHAR(10)&"Payout $: "&Sheet2!D1&CHAR(10)&"Share%: "&Sheet2!E1

这意味着这将在 1 个单元格中显示每个项目的所有字段，并在它们之间强制回车。这使您能够向下拖动公式并捕获所有项目。您必须将单元格设置为换行文本才能正确查看。希望这可以帮助。问候，

【讨论】：