VBA – 基于其他表格筛选表格

我无法从工作表（“March”）中find的一个表格中复制值（例如复制到另一个表格（“所有月份的总和”）。

工作表（“所有月份的总数”）的值在1-543之间，每个值每个月有12个特定的行，所以值1有12个行，具有唯一的月份（1月，2月等等）。

另一方面，表格（“March”）仅具有值1-432,510-542。 （每个都有不同的值）。 我想对Sheet（“Total of all months”）进行sorting，只显示1-432,510-542和3月份的行，因此更容易将Sheet（“March”）的值复制到Sheet（“Total of all个月“）。

我已经尝试了一个while循环，循环遍历表（“March”）中的所有值，并使用VBA .Find查找Sheet（“Total of all months”）中的索引。 但是这需要很长的时间。 有没有像上面提到的那样使用自动filter的方法？

我试过了：

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

对表格（“所有月份总数”）中的表格进行sorting只显示“Mar”，但我也想根据在Sheet（“表格”）中find的表格“Mars”中find的范围A2：火星”）