VBA将符合条件的单元格复制到另一个工作表答案

【问题标题】：VBA copy cells that meet criteria to another sheetVBA将符合条件的单元格复制到另一个工作表
【发布时间】：2014-07-05 22:24:59
【问题描述】：

我是 VBA 的新手。如果 Sheet 2 上的单元格与第一列中列出的值匹配，我想将一系列单元格从 Sheet1 复制到 Sheet2。例如，我想从 SHEET1 开始，然后让数据看起来像下面的 SHEET2：

SHEET1
A2=Adam B2=95 C2=92 D2=97 E2=67 F2 blank G2 blank H2 blank
A3=Cindy B3 blank C4 blank D4 blank E4=61 F4=94 G4=95 H4=95

SHEET2
A2=Adam B2=95 C2=92 D2=97 E2=67
A3=Cindy B3=94 C4=95 D4=95 E4=61

在本例中，我想先将 Sheet1 B2:D2 中的信息复制到 Sheet2 B2:2。然后我想从 Sheet1 F3:H3 复制信息并填写 Sheet 2 B3:D3 中的空白。 E 列中的所有信息都应保留在原处。

任何帮助将不胜感激！

编辑我（Tony Dallimore）尝试将 Sheet1 和 Sheet2 的描述转换为更直观的内容：

Sheet1
   |  A   |  B   |  C   |  D   |  E   |  F   |  G   |  H   |
 2 |Adam  |    95|    92|    97|    67|      |      |      |
 3 |Cindy |      |      |      |      |      |      |      |
 4 |      |      |      |      |    61|    94|    95|    95|

Sheet2
   |  A   |  B   |  C   |  D   |  E   |  F   |  G   |  H   |
 2 |Adam  |    95|    92|    97|    67|      |      |      |
 3 |Cindy |    94|      |      |      |      |      |      |
 4 |      |      |    95|    95|    61|      |      |      |

【问题讨论】：

err...到目前为止，您到底做了什么？这不是一个“帮助我”的网站。您在这里发布编程问题，人们可能会根据解决方案如何使一般编程社区受益而提供帮助。请发布您现有的代码以及它停止工作的确切位置。
我为你的工作表描述创建了一张图片，但它并没有帮助我理解你想要什么。在网上搜索“Excel VBA 教程”。任何教程都会在前几页显示简单的工作表访问。

标签： vba excel cut-and-paste

【解决方案1】：

如果我正确理解您的问题，您可能不需要 VBA 解决方案。我只需转到 I:K 列并输入一个公式来提取 B:D 列中的值或 F:H 列中的值，如下所示：（单元格 I2 的示例）

=IF(B2="",F2,B2)

根据需要将公式的三列向下拖动到任意多的行，现在单元格 I:K 具有您需要的所有值。然后，您可以复制>>选择性粘贴 - 粘贴值以将所有内容放入 B:D 列中。

【讨论】：