[算表] Excel VBA 多條件篩選並複製貼上的問題

[ohmsn (彼得)]

軟體:
Excel
版本:

範例
   A     B   C   D
1 玩家  勝  負  成績
2  甲    1   1    0
3  乙    2   1    1
4  丙    1   3   -2
5  丁    4   2    2
6  戊    0   1   -1
7 合計   8   8    0

我想撈取表格中 「勝」或「負」> 2 (不包含合計那欄)
並將該欄整欄複製貼上到
另一工作表sheet2

實際表格資料多很多，想藉由寫VBA的方式自動撈取資料
想求助版上能否提供協助，謝謝!

目前我是用.AutoFilter篩選的方式來作
但是發現用篩選似乎會造成B沒有C就沒有的問題

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 118.163.78.25 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1576222742.A.B60.html
→ soyoso: 可改為 range.advancedfilter 來寫勝或負(分二列)的條件
→ soyoso: 不要出現合計那一列的話，玩家方面再加上<>(非)合計的部分
→ soyoso: 要用range.autofilter的話，就配合一欄輔助欄，判斷勝或負
→ soyoso: >2時回傳什麼可以辨識的字串或數字，再篩選該輔助欄
→ ohmsn: 我也曾經想透過輔助欄位，但因為表格的部份實在無法在新增
→ ohmsn: 不好意思，剛剛上網搜尋了一下range.advancedfilter的用法
→ ohmsn: 看了很多不太理解so大您說的要怎麼使用，在下新手
→ ohmsn: 能否請您大概示範一下要怎麼寫....我在來調整看看~
→ soyoso: 假設條件方面寫在儲存格f1:h3，f1:h1就是標題(同內文a1:c1
→ soyoso: )，儲存格g2和h3就為>2，那非合計列方面就是寫在f2:f3，
→ soyoso: <>合計
→ soyoso: 因此上述回文range.advancedfilter或range.autofilter會於
→ soyoso: 另外儲存格內建立條件
→ ohmsn: 雖然我還是看不太懂，但還是很謝謝so大熱心回覆，感謝
→ soyoso: 有了回文的條件range.advancedfilter criteriarange就指定
→ soyoso: range("f1:h3")，要複製貼上到其他儲存格action就為
→ soyoso: xlfiltercopy，copytorange方面就看要哪個儲存格
→ ohmsn: 感謝so大耐心解說，非常感激!!