[問題] EXCEL VBA 篩選欄位後分頁或分檔案
各位大大好
現在我想要用特定欄位欄的值篩選分檔案或是分頁
以下我先簡述我的方法 各位高手可以跳過
我用的方法是利用EXCEL本身的"特殊篩選"
Columns(ert & ":" & ert).AdvancedFilter Action:=xlFilterInPlace, Unique:=True
複製到一個Transit分頁
Sheets.Add After:=ActiveSheet
Sheets(ActiveSheet.Name).Name = "transit"
Sheets("transit").Select
Range("A1").Select
ActiveSheet.Paste
然後從A1用設迴圈變數X到最後一個
For i = 2 To Sheets("transit").Range("A1").End(xlDown).Row
x = Sheets("transit").Cells(i, "A")
再回原本的工作表篩選那欄篩選並複製出去
PM53 = Range("A2").End(xlDown).Row
ActiveSheet.Range("$A$2:$" & ert & PM53).AutoFilter Field:=Range("a1:" &
ert & "1").Columns.Count, Criteria1:=x
重點在這
雖然這樣可以達到我的目的但是
在資料量很多的時候
這樣篩選在複製出去很吃資源
請問各位有沒有更有效率的方法
例如:不用用一個TRANSIT表做轉接 直接回圈指定欄位的唯一值(刪除重複)
本人都是自學依據EXCEL錄製的功能 想比較沒有效率的方法
以上問題若有不詳盡的還請大家指出來
再請各位高手幫忙
--
▁ ◢███◣ ◥◥◥◤◤◤ ╭ 幹妳媽的!!"送我便當", ╮
▉宇▏ █◤@~◥█ ◥◤◤◥◤◤ 免費送你天照牌瓦斯桶!! ╯ψindiaF4
▉智▏ ◤⊙/\⊙◥ ◤◥◤◥◥◤◤ ▄▄ ▄▄ ▄▄ ▄▄ ▄▄
▉bo▏ 皿 ◥◤◤◤◤◤◥ ▌ ▌ ▌ ▌ ▌ ▌ ▌ ▌ ▌ ▌
▉yo▏ ◥ ︶ ◤ ◥◤◤◥◥◥◤◤ 天 天 天 天 天
▇ ◢███◣ ◥◤◤◤◥◥◤ 照 照 照 照 照
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 123.18.22.195
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1557208926.A.872.html
→
05/07 14:05,
6年前
, 1F
05/07 14:05, 1F
→
05/07 14:06,
6年前
, 2F
05/07 14:06, 2F
→
05/07 14:08,
6年前
, 3F
05/07 14:08, 3F
→
05/07 14:08,
6年前
, 4F
05/07 14:08, 4F
→
05/07 14:10,
6年前
, 5F
05/07 14:10, 5F

→
05/07 14:21,
6年前
, 6F
05/07 14:21, 6F
→
05/07 14:22,
6年前
, 7F
05/07 14:22, 7F
→
05/07 14:23,
6年前
, 8F
05/07 14:23, 8F
→
05/07 14:23,
6年前
, 9F
05/07 14:23, 9F
→
05/07 14:24,
6年前
, 10F
05/07 14:24, 10F
→
05/07 14:25,
6年前
, 11F
05/07 14:25, 11F
→
05/07 14:28,
6年前
, 12F
05/07 14:28, 12F
→
05/07 14:28,
6年前
, 13F
05/07 14:28, 13F
→
05/07 14:52,
6年前
, 14F
05/07 14:52, 14F
→
05/07 14:52,
6年前
, 15F
05/07 14:52, 15F
→
05/07 14:54,
6年前
, 16F
05/07 14:54, 16F
→
05/07 14:56,
6年前
, 17F
05/07 14:56, 17F
→
05/07 14:57,
6年前
, 18F
05/07 14:57, 18F
→
05/07 14:58,
6年前
, 19F
05/07 14:58, 19F
→
05/07 14:59,
6年前
, 20F
05/07 14:59, 20F
Office 近期熱門文章
PTT數位生活區 即時熱門文章