百度360必应搜狗淘宝本站头条
当前位置:网站首页 > 技术文章 > 正文

利用FindPrevious方法进行重复搜索

cac55 2024-09-19 16:58 32 浏览 0 评论

在上一讲中,我讲了利用FIND方法进行单值和多值查找的方法,今日继续讲解,今日讲解FindPrevious方法进行重复搜索的方法。

FindPrevious方法的语法:

expression.FindPrevious(After)

FindPrevious方法和FindNext方法唯一的区别是FindPrevious方法查找匹配相同条件的前一个单元格而FindNext方法是查找匹配相同条件的下一个单元格。

另外,在实际的应用中我们还可以用Like运算符,进行更为复杂的模式匹配查找,

Like运算符用来比较两个字符串,语法如下:

result = string Like pattern

a)参数string是必需的,字符串表达式。

b)参数pattern是必需的,字符串表达式。

c)如果string与pattern匹配,则result为True;如果不匹配,则result为False。但是如果string或pattern 中有一个为,则result 为 Null。

d)参数pattern可以使用通配符、字符串列表或字符区间的任何组合来匹配字符串。下表列出pattern中允许的字符以及它们与什么进行匹配。

下面我们通过一个实例来讲解,先看下面的代码,如下面所示:

Sub myLike()

Dim rng As Range

Dim a As Integer

a = 1

With Sheet2

.Range("A:A").ClearContents

For Each rng In .Range("B1:E1000")

If rng.Text Like "*a*" Then

.Range("A" & a) = rng.Text

a = a + 1

End If

Next

End With

End Sub

代码分析:

myLike过程使用For Each...Next语句和Like运算符在单元格区域B1:E10000中搜索含有"a"字符的单元格,找到匹配单元格以后将单元格的值写入到A列中。

第6行代码使用ClearContents方法清除A列区域的数据。

第7行代码使用For Each...Next语句在单元格区域B1:E10000中循环。

第8行代码使用Like运算符在单元格区域B1:E10000中搜索含有"a"字符的单元格。

第9行代码将找到的匹配单元格的值写入到A列中。

在上一讲和本讲中,先后讲解了FIND、FINDNEXT、FINDPrevious三个方法的利用,这在VBA中利用的非常广泛,尤其是FIND和FINDNEXT方法,是解决查找问题的通用的终结方法,比EXCEL中的LOOKUP方法要灵活的多,也简单的多,还希望大家在工作中真正地掌握这些方法。

今日内容回向:

1 FIND、FINDNEXT、FINDPrevious 有什么不同?

2 LIKE运算是如何进行比较的?

相关推荐

Mac电脑强制删除任何软件方法-含自启动应用

对于打工者来说,进入企业上班使用的电脑大概率是会被监控起来,比如各种流行的数据防泄漏DLP,奇安信天擎,甚至360安全卫士,这些安全软件你想卸载是非常困难的,甚至卸载后它自己又安装回来了,并且还在你不...

Linux基础知识 | 文件与目录大全讲解

1.linux文件权限与目录配置1.文件属性Linux一般将文件可存取的身份分为三个类别,分别是owner/group/others,且三种身份各read/write/execute等权限文...

文件保护不妥协:2025 年 10 款顶级加密工具推荐

数据安全无小事,2025年这10款加密工具凭借独特功能脱颖而出,从个人到企业场景全覆盖,第一款为Ping32,其余为国外英文软件。1.Ping32企业级加密核心工具,支持200+文件格...

省心省力 一个软件搞定系统维护_省心安装在哪里能找到

◆系统类似于我们居住的房间,需要经常打理才能保持清洁、高效。虽然它本身也自带一些清理和优化的工具,但借助于好用的第三方工具来执行这方面的任务,会更让人省心省力。下面笔者就为大家介绍一款集多项功能于一身...

JAVA程序员常用的几个工具类_java程序员一般用什么软件写程序

好的工具做起事来常常事半功倍,下面介绍几个开发中常用到的工具类,收藏一下,也许后面真的会用到。字符串处理:org.apache.commons.lang.StringUtilsisBlank(Char...

手工解决Windows10的若干难题_windows10系统卡顿怎么解决

【电脑报在线】很多朋友已经开始使用Win10,估计还只是测试版本的原因,使用过程中难免会出现一些问题,这里介绍解决一些解决难题的技巧。技巧1:让ProjectSpartan“重归正途”从10074...

System32文件夹千万不能删除,看完这篇你就知道为什么了

C:\Windows\System32目录是Windows操作系统的关键部分,重要的系统文件存储在该目录中。网上的一些恶作剧者可能会告诉你删除它,但你不应该尝试去操作,如果你尝试的话,我们会告诉你会发...

Windows.old 文件夹:系统备份的解析与安全删除指南

Windows.old是Windows系统升级(如Win10升Win11)或重装时,系统自动在C盘创建的备份文件夹,其核心作用是保留旧系统的文件、程序与配置,为“回退旧系统”提供保...

遇到疑难杂症?Windows 10回收站问题巧解决

回收站是Windows10的一个重要组件。然而,我们在使用过程中,可能会遇到一些问题。例如,不论回收站里有没有文件,都显示同一个图标,让人无法判别回收站的空和满的真实情况;没有了像Windows7...

卸载软件怎么彻底删掉?简单几个步骤彻底卸载,电脑小白看过来

日常工作学习生活中,我们需要在安装一些软件程序,但随着软件的更新迭代速度,很多时候我们需要重新下载安装新的程序,这时就需要将旧的一些软件程序进行卸载。但是卸载软件虽然很简单,但是很多小伙伴们表示卸载不...

用不上就删!如何完全卸载OneDrive?

作为Windows10自带的云盘,OneDrive为资料的自动备份和同步提供了方便。然而,从隐私或其他方面考虑,有些人不愿意使用OneDrive。但Windows10本身不提供直接卸载OneDri...

【Linux知识】Linux下快速删除大量文件/文件夹方法

在Linux下,如果需要快速删除大量文件或文件夹,可以使用如下方法:使用rm命令删除文件:可以使用rm命令删除文件,例如:rm-rf/path/to/directory/*这个命令会递...

清理系统不用第三方工具_清理系统垃圾用什么软件

清理优化系统一定要借助于优化工具吗?其实,手动优化系统也没有那么神秘,掌握了方法和技巧,系统清理也是一件简单和随心的事。一方面要为每一个可能产生累赘的文件找到清理的方法,另一方面要寻找能够提高工作效率...

系统小技巧:软件卸载不了?这里办法多

在正常情况下,我们都是通过软件程序组中的卸载图标,或利用控制面板中的“程序和功能”模块来卸载软件的。但有时,我们也会发现利用卸载图标无法卸载软件或者卸载图标干脆丢失找不到了,甚至控制面板中卸载软件的功...

麒麟系统无法删除文件夹_麒麟系统删除文件权限不够

删除文件夹方法例:sudorm-rf文件夹名称。删除文件方法例:sudorm-r文件名包括扩展名。如果没有权限,给文件夹加一下权限再删。加最高权限chmod775文件名加可执行权限...

取消回复欢迎 发表评论: