如何自动转移另一个Excel工作表中的特定字段?

时间:2017-10-27 09:40:59

标签: database excel

我有一张包含一些数据的excel表,即主表。如何将主表中特定列(即此处为A)的包含相同值的字段自动传输到另一个工作表。 请看一下这个例子:
这是主要表格:

   A       B     C     D   
1  Smith   100   Mar   1
2  Bob     95    Apr   5 
3  John    34    Aug   4 
4  Bob     88    mar   7 
5  John     7    Apr   4

假设列A是排序的参考列。我们希望A中包含相同值的所有字段都移动到单独的工作表中。对于A的其他重复值也是如此。

结果应为:

Sheet 1:
       A       B     C     D   
    1  Bob     95    Apr   5
    2  Bob     88    mar   7 


Sheet 2:
       A       B     C     D   
    1  John    34    Aug   4 
    2  John     7    Apr   4

Sheet 3:
       A       B     C     D   
    1  Smith   100   Mar   1

如果可能,我希望此方法是最新的,就像在主工作表中删除了一行一样,更改将应用​​于相应的工作表。

1 个答案:

答案 0 :(得分:0)

你可以:

1)使用sheet2(cell)= sheet1(cell)引用复制工作表中的数据。然后为列的每个新工作表打开过滤器作为所需值。 2)编写一个VB脚本,可能由工作表(主数据)onChange函数触发监视该数据范围,并将rowns复制到新的WSs。

3)为每个"额外"制作一个新的数据透视表。表单,您可以在其中配置要显示的数据

实施有点取决于您是否要保持数据"最新"比如主数据中是否有行删除应该从其他工作表中删除等,但简单的一次复制就像代码一样(不是实际语法而只是伪代码):

sub Worksheet_Change(范围)

如果范围在wnated范围内

将表格(数据)中的整行复制到表格X(将根据A栏的值选择表格X)