复杂的VBA删除多个页面的重复，然后删除空白行循环所有表

我花了几个小时在互联网上尝试工作的东西，但不能得到一个VBA修复工作在像我这样的复杂工作表！您的帮助将不胜感激。复杂的VBA删除多个页面的重复，然后删除空白行循环所有表

对于所有这些查询，我想遍历所有工作表，但跳过名为“计时代码”，“帐单日期”的工作表&“摘要” - 这些名称将始终相同，但我无法命名床单。脚本需要循环，名称和数量会有所不同。

在所有其他工作表上它将循环我需要选择范围“A1002：A2003”，如果有重复删除行。

我还需要对范围“A2005：A3006”执行相同操作。

请注意，这两个范围都在表中，但同样表名不能被命名，因为它们会有所不同。

我不知道是否有帮助，但全表范围A1002：A2003是A1002：B2003 和A2005全表范围：A3006 A2005是：AD3006

我也不能去A1002直到A3006作为一些值将在两个范围示出，但我将需要他们两个

循环相同的片材，然后我需要删除从A1001的所有行向上到单元格的值是上次使用的细胞=“ “

我在VBA上的技能非常有限，而且相当复杂的查询，所以我基本上从头开始坚持，所以任何代码你必须做到这一点将是惊人的！

我希望这是有道理的。

许多thnaks

来源

2016-05-23 Fcarboni

'在互联网上花费了数小时试图解决问题'所以显示你到目前为止。 '你必须做的任何代码'这不是一个代码写入服务。 – findwindow

所以你有一个查询？你可以在加载到Excel之前将它们过滤掉吗？ @findwindow是对的，这不是一个代码写入服务。你必须自己尝试一些VBA，然后用你的尝试来找到我们。 –

首款谷歌进入解决您的问题：

Delete all duplicate rows Excel vba

现在你必须产生解决此功能的回路来定位正确的纸张。

来源

2016-05-24 06:23:51 Heini

我试过在一张纸上，它所做的只是跳到那张纸上并选择范围。 '私人小组CommandButton1_Click（）' 'Sheet18.Activate' '随着ActiveSheet' '设置RNG =范围（ “A1002”，范围（ “B1002”）。完（xlDown））' 'RNG .RemoveDuplicates Columns：= Array（1，2），Header：= xlYes' 'End With' 'End Sub' – Fcarboni

Columns：= Array（1,2）删除行，如果AxBx中的条目等于AyBy中的条目 – Heini

Columns：= Array（2）仅检查第二列并删除整行。如果我不知道输入是怎么样的，那很难建立一个宏 – Heini

复杂的VBA删除多个页面的重复，然后删除空白行循环所有表

回答

相关问题