excel Criteria1实例
发布时间：2023-05-23 04:58:50
关于excel的Criteria1用法实例，是结合VBA来使用的，下面是关于Criteria1用法的几个例子，希望对你有所帮助。
Sub SimpleOrFilter()
Worksheets("SalesReport").Select
Range("A1").AutoFilter
Range("A1").AutoFilter Field:=4,Criteria1:="=A", Operator:=xlOr, Criteria2:="=B"
End Sub
Sub SimpleAndFilter()
Worksheets("SalesReport").Select
Range("A1").AutoFilter
Range("A1").AutoFilter Field:=4, _
Criteria1:=">=A", _
Operator:=xlAnd, Criteria2:="<=EZZ"
End Sub
Sub Top10Filter()
' Top 12 Revenue Records
Worksheets("SalesReport").Select
Range("A1").AutoFilter
Range("A1").AutoFilter Field:=6, Criteria1:="12",Operator:=xlTop10Items
End Sub
Sub MultiSelectFilter()
Worksheets("SalesReport").Select
Range("A1").AutoFilter
Range("A1").AutoFilter Field:=4, Criteria1:=Array("A", "C", "E","F", "H"),Operator:=xlFilterValues
End Sub
Sub DynamicAutoFilter()
Worksheets("SalesReport").Select
Range("A1").AutoFilter
Range("A1").AutoFilter Field:=3,Criteria1:=xlFilterNextYear,Operator:=xlFilterDynamic
End Sub
Sub FilterByIcon()
Worksheets("SalesReport").Select
Range("A1").AutoFilter
Range("A1").AutoFilter Field:=6, _
Criteria1:=ActiveWorkbook.IconSets(xl5ArrowsGray).Item(5),Operator:=xlFilterIcon
End Sub
Sub FilterByFillColor()
Worksheets("SalesReport").Select
Range("A1").AutoFilter
Range("A1").AutoFilter Field:=6, Criteria1:=RGB(255, 0, 0), Operator:=xlFilterCellColor
End Sub
0
投稿猜你喜欢
- 条形码 (barcode)是将宽度不等的多个黑条和空白，按照一定的编码规则排列，用以表达一组信息的图形标识符。在商场中的商品上都有条形码，用
- 为了方便阅读，我们在使用wps文字的时候，可以将其设置为全屏显示的效果，具体的操作是怎样的呢?下面给大家分享wps如何设置全屏显示效果的方法
有消息称，Windows 11 上安卓子系统运行 Android 应用程序的第一个预览版现已提供给美国 Beta 频道的 Windows 内- 不少人平时使用的是办公电脑，经常会有其他人借用，为了防止不必要的错误，会想要对开机问候语上进行备注说明，那么要如何更改系统的开机问候语呢？其
- 如何使用公式求得最近的日期？例如，下图1所示，x表示该日期开展了一次活动，在列G中求出对应的最近一次活动日期。图1先不看答案，自已动手试一试
- 有些用户在lion系统上恢复雪豹系统到U盘时，系统便会提示“无法恢复—资源忙”。但是将U盘替换成移动硬盘时，却不会出现这个问题。那么该怎么进
- Win10右下角不显示输入法图标怎么办？有一些朋友发现电脑右下角不显示此时的输入法状态，没有输入法图标怎么办，今天系统之家小编给朋友们详细讲
- 今天教大家在excel表格中画斜线、双斜线、三斜线、四斜线的方法，下面小编将详细的为大家介绍如何在excel表格中画斜线、双斜线、三斜线、四
- 关于Win7网络连接出错代码629的处理方法操作系统出错，给出提示，一定要自己查看，很多讯息都已经在其中了。正在验证用户名和密码(错误629
- 之前曾有消息称，苹果可能会在3月中旬举行春季新品发布会，虽然官方还没有公布具体时间，不过按照他们之前的习惯看，大概率会这样安排。春季发布会上
- excel公式中比较运算符主要是用来比较大小，比较是否相等，返回一个正确（true），或者返回一个错误(false)，而比较运算符也经常用来
- 老电脑安装win11正式版方法教程？Win11正式版系统是非常火热的电脑操作系统，但是安装Win11系统有一点的配置要求，那对于一些的老旧电
- excel中一个单元格的数据怎么分列成多个数据？Excel是一款功能非常强大的办公软件，工作中我们也不可避免的会用到excel的各种功能，下
- 如何在Mac上的“通讯录”中设置我的名片呢？别急，小编给大家带来了在Mac上的“通讯录”中设置我的名片的教程，快来跟小编看看吧！“通讯录”在
- Win10上市已久，但是对于4、50岁的用户而言操作起来过于麻烦，没有XP的方便。所以有部分用户会选择重新安装XP系统，那么要如何安装呢？其
- 站长工具大家都有用过许多，今天小编分享的这款搜索盒子相信不少用户也使用过，那就是由明振软件推出的明振搜索盒子，软件为绿色版本，不用安装就能打
- 利用拖动边框来调节word中图片的大小，如何用精确调节图片尺寸的方法来调节图片的大小。其实设置方法不难，对于新手来说还是有一定难度，怎么办?
- “FPS”是词组“Frames Per Second”的缩写。穿越火线（简称CF）是一款大型的网络游戏，深受大家的喜欢。使用Win7系统的用
- 我们在使用win7操作系统电脑的时候，有些情况下我们可能会想要更换自己的输入法，但是还是有很多小伙伴不知道应该怎么操作。那么对于这个问题小编
- win11麦克风没声音怎么设置？win11麦克风如果没有声音，就没法语音聊天沟通了，这时候我们应该怎么设置呢，其实一般只要尝试开启麦克风，或
