摘要: Sub 如何进行自动筛选() Range("A1").AutoFilter Field:=1, Criteria1:="2" '按第1列(字段),条件为第2列中等于2的进行筛选. ActiveCell.AutoFilter '取消自动筛选,即后面不加任何条件,则为取消自动筛选.End SubSub 如何进行自定义筛选() Range("A1").AutoFilter field:=2, Criteria1:=">=10",Operator:=xlAnd, Criteria2:="&l 阅读全文
posted @ 2010-03-04 18:00 surfacetension 阅读(744) 评论(0) 推荐(0) 编辑
摘要: 问题提示:本次主要是想解决如何在工作表内部、工作表间、工作簿间进行单元格数据的复制、剪切、粘贴等操作,在工作中,经常需要进行数据的复制与粘贴,尤其是在工作表内进行操作,而且很多时候都是按班内名次排好序后,然后自动筛选出各个班的名单另存为新的工作簿,以便于分发至各班主任手中,以前主要是通过手工操作,或者是通过数据库技术,反正感觉不是很舒服。现在主要是想解决这个问题!!这样的话就有以下几个问题需要解决:①如何排序?②如何筛选?③如何提取数据至新表(第1种还在原工作簿内;第2种存储至新工作簿内),并保留原格式不变?④在③的基础上,如果再能解决自定义筛选的话比如提取各班前40名学生名单,或者学籍号不为 阅读全文
posted @ 2010-03-04 11:31 surfacetension 阅读(299) 评论(0) 推荐(0) 编辑