我們有一個每月的流程，將資訊從 SAP 手動匯出到 Excel，然后從中創建生產計劃。將資訊提高到 excel 的第一步是過濾到某些條件并洗掉其余條件。我是 VBA/宏的初學者，我只能在網上找到關于如何通過特定條件洗掉行而不是洗掉超出我想要的條件的行的示例。
我想洗掉所有狀態為“XXX”的訂單。然后我想洗掉所有訂單型別，除了：Z、L、ZR
我假設這是可能的，我只是沒有受過足夠的 vba 教育，無法弄清楚......讓我知道，謝謝！
uj5u.com熱心網友回復：
對要保留的內容應用過濾器，并將它們復制到新作業簿或可以從中復制回來的臨時作業表。
Option Explicit
Sub Macro1()
Const COL_STATUS = 1 ' column no
Const COL_ORDERTYPE = 4 ' column no
Dim ws As Worksheet, wsTemp As Worksheet
Dim rng As Range
With ThisWorkbook
Set ws = .Sheets("Sheet1")
Set wsTemp = .Sheets.Add(after:=.Sheets(.Sheets.Count))
End With
Application.ScreenUpdating = False
With ws.UsedRange
.AutoFilter COL_STATUS, Array("Z", "L", "ZR"), xlFilterValues
.AutoFilter COL_ORDERTYPE, "<>ZZZ"
.Copy wsTemp.Range("A1")
.AutoFilter
.Cells.Clear
End With
With wsTemp
.UsedRange.Copy ws.Range("A1")
Application.DisplayAlerts = False
.Delete
Application.DisplayAlerts = True
End With
Application.ScreenUpdating = True
MsgBox "Done"
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/caozuo/353777.html
上一篇：將范圍轉換為表格
下一篇：變數前導零（數字格式）