軟體:Excel
版本:365
一開始會將資料篩選的結果複製到新增的工作表中
並且依照迴圈範圍更改工作表名稱
For i = 2 To Range("A2").End(xlDown).Row
ActiveSheet.ListObjects("訂單").Range.AutoFilter
Field:=3, Criteria1 :=Sheets("篩選區").Range("A" & i)
複製貼上的範圍這邊就不打上了
Sheets.Add After:=ActiveSheet
Sheets(ActiveSheet.Name).Select
Sheets(ActiveSheet.Name).Name = Sheets("篩選區").Range("A" & i)
這前面都沒問題
接下來想從xx工作表中選取某範圍的資料貼到剛剛新增的工作表
Sheets("xx").Select
Rows("1:6").Select
Selection.Copy
Sheets(Sheets("篩選區").Range("A" & i)).Select
跑到這段會顯示型態不符
請問要怎麼改呢?
前面篩選可以用Sheets("篩選區").Range("A" & i)為什麼這邊就不能?
Next i
研究好久還是不會...