每日盤點資料如何使用vba自動增加欄位及框線

請教一下,因公司倉庫每日都會盤點
盤點的資料都是用系統跑來的,我要如何在下圖用巨集達到我的需求
因此報表都是有異動的部分,所以每天得項次會有不同,例如今天25筆,明天10筆
黃色區域為要刪除部分,綠色區域是我要用vba自動增加的欄位(綠色欄位固定都是在最後一欄)
每日盤點資料如何使用vba自動增加欄位及框線
目前是用錄製方式跑出下列程式
Sub TEST()
'
' TEST Macro
'

'
Range("D:D,E:E,F:J,L:N,P:R,T:AD,AF:CZ").Select <=因為太多要刪除的
Range("AF1").Activate
Selection.Delete Shift:=xlToLeft
Range("A1").Select
Range("B:B").ColumnWidth = 20
Range("C:C").ColumnWidth = 18
End Sub

另外假如我要料號另外挑出來盤點,例如1.2.5.7.9是同一種產品,但要自動新增到另一張活頁簿中(列如sheet2),原本的活頁簿就刪除
這有辦法用vba達成嗎

再麻煩各位大大們指導
文章分享
評分
評分
複製連結

今日熱門文章 網友點擊推薦!