VBA - 根据其他表筛选表

时间:2017-07-11 10:55:57

标签: excel vba excel-vba

我在从Sheet(“March”)中找到的一个表中复制值时遇到问题(例如,另一个工作表(“所有月份总数”)。

工作表(“所有月份的总和”)的值范围为1-543,每个值的每行有12行特定值,因此值1有12行,具有唯一的月份(Jan,Feb等)。

另一方面,

Sheet(“March”)仅具有值1-432,510-542。 (每个都有不同的价值观)。我想将Sheet(“所有月份的总和”)排序为仅显示1-432,510-542以及带有March的行,因此可以更轻松地将Sheet(“March”)的值复制到Sheet(“Total of all”个月“)。

我尝试了一个while循环,循环遍历Sheets(“March”)中的所有值,并使用VBA .Find查找Sheet中的索引(“所有月份的总和”)。但这需要很长时间。有没有办法使用如上所述的自动过滤器?

我试过了:

 Worksheets("Sheet2").Range("A1").AutoFilter _
 field:=2, _
 Criteria1:="Mar", _
 VisibleDropDown:=True

对Sheet中的表(“所有月份的总和”)进行排序仅显示“Mar”但我还想根据在A2中找到的值对表格进行排序:在“火星”表中找到的A475片材( “火星”)

0 个答案:

没有答案