如何基于该行中的单元格值复制特定行并将其粘贴到匹配的工作表中

时间:2020-02-28 20:27:50

标签: excel vba

我正在尝试基于颜色(在列之一中列出)复制行,并将该数据粘贴到名为该特定颜色的工作表中(例如:复制所有蓝色的数据并将其粘贴到一个名为Blue的工作表中)。我已经有一个宏,可以创建所有附带的工作表,但我只是想不出如何根据一列中的值将行复制和粘贴到匹配的工作表中。

每种颜色都有多行。

1 个答案:

答案 0 :(得分:0)

由于您未共享任何代码,因此我将为您提供一种潜在方法的高级概述,以及可用于示例的示例


  1. 创建一个变量以存储所需的颜色。例如:iColor = "Red"
  2. 然后用iColor过滤颜色列,然后复制可见的单元格。 EXAMPLE
  3. 然后您可以使用以下方法找到工作表(假设其名称与iColor相同):ThisWorkbook.Sheets(iColor).Range("A1").Paste