抱歉自己回自己的問題
從文章下方版友的推文來看
猜測我的檔案會很大可能是因為選擇資料範圍過大→Range("C1:I306")
那想請教一下各位版友，會選擇Range("C1:I306")
是因為我要copy的是被篩選過的資料
如果不把範圍拉這麼大的話會漏抓
要怎麼寫才可以不要選取那麼大的範圍
只選取被篩選到C至I欄中的資料並複製呢？謝謝！
※ 引述《brotherashin (Mao'la-gagugisu'one)》之銘言：
: 軟體:excel
: 版本:2003
: 因為工作需要，在excel中錄了一個巨集再加以修改
: (才剛開始學VBA，不是很會寫 哈)
: 如下
: Sub 負責系統列表()
: Sheets("System").Select
: Selection.AutoFilter Field:=1, Criteria1:=Range("J1")
: Range("C1:I306").Select
: Selection.Copy
: Sheets("Handover").Select
: Range("B7").Select
: ActiveSheet.Paste
: Selection.AutoFilter
: Range("B7:H28").Sort Key1:=Range("B9"), Order1:=xlAscending
: End Sub
: 和這個巨集相關的工作表有 "Handover" 和 "System"
: 巨集是用來filter "system" 裡的資料
: 然後複製貼上到 "handover"這個工作表再作排序
: 不知道為什麼這個巨集錄完後，我的檔案變成3MB @@
: 有板友知道要怎麼修改才能縮小檔案的size嗎？
: (因為是要share給同事用，大家以後會常常用e-mail寄送這個檔案
: 不希望它太大~)
: 感謝喔！
--
╭─ ╭─╯
These are │ ╰─╮ * ｏａｓｉｓ
╰─ ｒａｚｙ days but they make me ╭─╯ｈｉｎｅ ──────╮
│
All around the World, Noel Gallagher Time keeps rolling by... │
╰─────────────────────────────────────╯
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 119.15.215.29