根据值将行复制到特定工作表

时间:2017-08-14 11:45:21

标签: excel vba excel-vba

想知道是否有人可以指出我正确的方向,因为我对我尝试的每种方法感到困惑。我已经搜索了很多答案,但我的情景与我找到的其他人有点不同。

我有一个工作表,每列都有许多列和标题。列A是"日期",列B是"分类",列C是"选择"。几列。

我想要做的是将整个工作表从A2循环到C列的最后一行。查看要复制的每组行的A列。 A列中的日期之间可能有空白行。对于A列中的每组行(日期到下一个日期-1行),我想根据B列将该范围或行复制到不同的工作表。

我编写了代码以删除B列引用的工作表,然后添加工作表并添加标题。

以下是一个示例:使用null表示空单元格

+------------+----------------+------------+
| Date       | Classification | Selection  |
+------------+----------------+------------+
| 10/08/2017 | Chris          | Selection1 |
+------------+----------------+------------+
| 11/08/2017 | Chris          | Selection2 |
+------------+----------------+------------+
| null       | null           | Selection3 |
+------------+----------------+------------+
| null       | null           | Selection4 |
+------------+----------------+------------+
| 11/08/2017 | Speed          | Selection5 |
+------------+----------------+------------+
| null       | null           | Selection6 |
+------------+----------------+------------+
| null       | null           | Selection7 |
+------------+----------------+------------+

上面有3"记录"需要复制到2张。 2个范围为Chris,1个范围为Speed。实际上,我有数百条"记录"需要移动到10张以上。基本上我必须为每个记录更新2张表,我想更新一个主人并让Excel为我做复制工作。

感谢您的帮助

1 个答案:

答案 0 :(得分:0)

这似乎有效但我猜有更好的方法!!

Unexpected item type 'GitProbe'