草庐IT

Autofter

全部标签

VBA Advanced Autofter +创建基于范围的新表

我需要根据工作表模板中的一系列单元格中的工作簿中创建新标签。我还想删除与标签名称不匹配的数据行。例如,从下表中,我将拥有一个名为“2206-6”的新选项卡,并且只有与之相关联的数据会保留,请记住,每次使用宏时,此数据范围都会更改。前:后:间隔编号2206-66304-54102-20该表从第11行开始,但我需要保留上面的所有信息。我有一个高级过滤器宏,可以接近我想要的东西,但是它做了我不想的两件事:创建空选项卡,而不保留第11行上方的信息。Subparse_data()DimlrAsLongDimwsAsWorksheetDimvcol,iAsIntegerDimicolAsLongDimmy

VBA:当手动过滤器执行时,为什么自动滤波器不起作用? (运行时错误'1004':方法'autofter'对象'范围'失败)

为以下代码获取运行时间错误。使用具有1000行的数据的数据转储,以获取某些列。从我在其他论坛上阅读的内容来看,如果没有“靠近”单元格的值,自动滤波器将无法正常工作。但是,当我将测试值更接近过滤器时,它仍然无法正常工作。手动过滤器正在同一范围内工作。CURrow=ActiveCell.RowLASTrow=ActiveCell.SpecialCells(xlLastCell).RowLASTcol=ActiveCell.SpecialCells(xlLastCell).ColumnIfLASTrow>CURrowThenColumns("A").InsertShift:=xlToRightRan