[算表] Excel VBA 多条件筛选并复制贴上的问题

楼主: ohmsn (彼得)   2019-12-13 15:39:00
软件:
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就没有的问题
作者: soyoso (我是耀宗)   2019-12-13 15:53:00
可改为 range.advancedfilter 来写胜或负(分二列)的条件不要出现合计那一列的话,玩家方面再加上<>(非)合计的部分要用range.autofilter的话,就配合一栏辅助栏,判断胜或负>2时回传什么可以辨识的字串或数字,再筛选该辅助栏
楼主: ohmsn (彼得)   2019-12-13 16:15:00
我也曾经想透过辅助字段,但因为表格的部份实在无法在新增不好意思,刚刚上网搜寻了一下range.advancedfilter的用法看了很多不太理解so大您说的要怎么使用,在下新手能否请您大概示范一下要怎么写....我在来调整看看~
作者: soyoso (我是耀宗)   2019-12-13 16:21:00
假设条件方面写在储存格f1:h3,f1:h1就是标题(同内文a1:c1),储存格g2和h3就为>2,那非合计列方面就是写在f2:f3,<>合计因此上述回文range.advancedfilter或range.autofilter会于另外储存格内建立条件
楼主: ohmsn (彼得)   2019-12-13 17:19:00
虽然我还是看不太懂,但还是很谢谢so大热心回复,感谢
作者: soyoso (我是耀宗)   2019-12-13 17:23:00
有了回文的条件range.advancedfilter criteriarange就指定range("f1:h3"),要复制贴上到其他储存格action就为xlfiltercopy,copytorange方面就看要哪个储存格
楼主: ohmsn (彼得)   2019-12-14 23:52:00
感谢so大耐心解说,非常感激!!

Links booklink

Contact Us: admin [ a t ] ucptt.com