为什么Excel 2010 VBA在应用AutoFilter时会隐藏行？

Question

您好，

出于某些原因，在Excel 2010和2016中，当我应用过滤器时，它会折叠行。这意味着当我尝试复制并粘贴到另一个工作表时，只会复制列标题。 （附图）

我试图取消隐藏行并更改行高等（手动和使用VBA），但除非我手动完成所有200多行，否则宏失败。在excel 2007上它工作正常，因为它不会折叠行。

代码行是这样的：

Selection.AutoFilter Field：= 1，Criteria：= Range（“A1”）。Value，Operator：= xlFilterValues

****我添加了一个新图片，除非我手动拖出行，即使有数据存在，它们仍保持隐藏状态***

我只是不明白为什么所有的行都被隐藏了？