本示例使当前工作表上所有的被筛选隐藏的数据可见。

ActiveSheet.ShowAllData