返回列表 上一主題 發帖

AutoFilter完刪除不需要的代號，但還是刪除了

jcchiang

帖子
234 
主題
19 
精華
0 
積分
276 
點名
0  
作業系統
Windows XP 
軟體版本
office 2003 
閱讀權限
20 
性別
男 
註冊時間
2013-1-7 
最後登錄
2021-10-7 
1# 跳轉到 »
發表於 2020-6-9 12:33 | 顯示全部帖子
回復 1# cclo0728

BG01與BD81因為採購補充為0被刪除

    '篩選0刪除
    Rows("1:1").Select
    Selection.AutoFilter
    ActiveSheet.Range("$A$1:$U$3000").AutoFilter Field:=2, Criteria1:="0"
    Range("A2").Select
    Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
    Selection.EntireRow.Delete
    ActiveSheet.Range("$A$1:$U$3000").AutoFilter Field:=1
    Range("A1").Select
    Selection.AutoFilter

TOP

        靜思自在 : 【時間無法遮擋】怕時間消逝，花了許多心血，想盡各式方法要遮擋時間，結果是：浪費了更多時間，且一無所成！
返回列表 上一主題