各位大神,我想把2月份的資料通過vba寫到生產列印表格式中,2月份還有部分資料不需要展示,只轉生產列印表中有的那些資料,可我寫到選擇區域就報錯了。求幫幫忙,資料區域有點亂,我這樣選擇區域沒有問題吧?


Sub 篩選()
Dim k As Range, arr(), ws As Worksheet
'On Error Resume Next
For Each ws In Worksheets
If ws.Name = [k1] Then
arr = ws.Range("a1", Cells(Rows.Count, "ai").End(xlUp).Offset(0, 2))
brr = ws.WorksheetFunction.Index(arr, 1, 0)
brr = WorksheetFunction.Transpose(brr)
r = ws.WorksheetFunction.Match([a2:a39], brr, 1)
If r > 0 Then
[b2:h39] = WorksheetFunction.Index(arr, 0, r)
End If
End Sub
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/261907.html
標籤:VBA
上一篇:VC 如何檢測手機攝像頭好壞?
