2926

Excel 如何自動設條件刪除多列-VBA

周金鵬:「錦子老師,舉例說明:

image

如果B欄大於10要整列刪除,讓資料變成

image

上面只是例子,因為我的資料有數千筆,一筆一筆刪除太累了,要如何處理較快,麻煩解惑 ~ 感恩,謝謝!」

錦子老師:「理論上,這是可以用VBA寫的,作法如下:」

步驟1:按ALT+F11鍵開啟VBA視窗。

步驟2:點取「插入 > 模組」指令,插入一個空白模組。

步驟3:輸入下列程式:

Sub Test()

Dim lastRow As Long

Dim i As Integer

lastRow = Cells(Rows.Count, 1).End(xlUp).Row

For i = 1 To lastRow

If Cells(i, 2).Value > 10 Then

Rows(i).EntireRow.Delete

i = i - 1

lastRow = lastRow - 1

End If

Next i

End Sub

步驟4:點取程式任一位置,按F5執行,即可將大於10的記錄整列刪除。

以上就是今天主要學習的知識點,希望對大家有所幫助~~有什麼問題歡迎留言,我會儘量及時的給大家答覆~~

更多相關影片教學:請點我

更多相關文章:請點我


arrow
arrow
    文章標籤
    VBA
    全站熱搜

    錦子老師 發表在 痞客邦 留言(0) 人氣()