複雜的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刪除多個頁面的重複，然後刪除空白行循環所有表

回答

相關問題