如何在Excel 2007中根據儲存格值自動刪除行？

Question

我希望根據該行中是否存在具有特定值的儲存格來自動刪除 Excel 2007 中的行。我用 Google 搜尋了一下，但只找到了有關以前版本的 Excel 的 VBA 腳本的舊信息，而且到目前為止，所有這些信息都不起作用。我正在尋找有關如何執行此操作的超級用戶品質解釋。

Answer 1

該巨集將刪除包含具有「fri」值的儲存格的行，然後將儲存格向上移動。只需將程式碼中的“FRI”變更為您要搜尋的值即可。您也可以修改它以提示輸入值或使用另一個儲存格中的值作為條件。

Sub DeleteThis()

For Each Rng In Selection.Rows
    If (Application.WorksheetFunction.CountIf(Rng, "fri") > 0) Then
        Rng.Delete Shift:=xlUp
    End If
Next Rng

End Sub

使用方法：選擇您的資料範圍，然後執行巨集。

樣本：
之前：

後：

非 VBA：您可以使用 Excel 的進階篩選器來選擇符合特定條件的行；不過，它可能需要一些紙張空間和更多步驟。