学习VBA，报表做到飞 第一章 入门篇 1.19 FindNext语句
cac55 2024-09-19 16:58 26 浏览 0 评论
第一章 入门篇
1.19 FindNext语句
FindNext语句是与Find语句结合在一起使用的，它的功能相当于Excel菜单里的“查找下一个”。该语句的语法是这样的：
Range("要查找的区域").FindNext(Find查找到的单元格)
例句：
在下表中的B列找到第2台、第3台空调，弹出它的地址。
卡片号 | 资产名称 | 建卡日期 | 原值 | 净值 |
00007933 | 空调 | 2007-12-31 | 498720.00 | 14961.60 |
00007934 | 台式电脑 | 2007-12-31 | 35670.00 | 1070.10 |
00012189 | 音响设备 | 2007-12-31 | 12420.00 | 372.60 |
00014439 | 空调 | 2008-06-11 | 6800.00 | 204.00 |
00014439 | 音响设备 | 2008-06-11 | 6800.00 | 204.00 |
00014439 | 音响设备 | 2008-06-11 | 6800.00 | 204.00 |
00072375 | 监控设备 | 2013-12-28 | 16986.00 | 509.58 |
00072448 | 空调 | 2013-12-28 | 6405.00 | 192.15 |
Sub FindNext()
Set 第一个 = Range("b:b").find("空调")
MsgBox Range("b:b").findnext(第一个).Address
Set 第二个 = Range("b:b").findnext(第一个)
MsgBox Range("b:b").findnext(第二个).Address
End Sub
其实本章节学习的FindNext语句的用法，与之前我们学到的For Each语句的用法有些类似。只不过For Each语句是逐行进行比对，而FindNext语句就像“跳蛙”战术一样，发现哪一行，就直接跳到哪一行去。当它跳到搜索到的行后，也可以与offset语句和resize语句相结合，对整行或整列进行操作。所以，Find和FindNext语句配对使用，它的循环语句的选择，与我们以后章节要介绍的DoLoop语句结合会更完美。DoLoop语句无限循环，不设定步长，当条件满足时退出循环，这一点与Find和FindNext语句的“跳蛙”战术相得益彰。
限于文字版的功能所限，有些具体的应用可能介绍得不够详细，读者在阅读某个语句的功能使用上会有些云里雾里的感觉。笔者正在考虑在《学习VBA，报表做到飞》文字版呈现给大家之后，再录制一个视频版，以期能够更直观、更详细的向大家介绍VBA，使大家能够真正的了解、掌握VBA的功能和使用方法，更好的为自己的工作服务！
往期精彩回顾：
学习VBA，报表做到飞 第一章 入门篇 1.18 Find语句
学习VBA，报表做到飞 第一章 入门篇 1.17 AutoFilter语句
学习VBA，报表做到飞 第一章 入门篇 1.16 Sort语句
我是云飞扬，职场财会人员，愿与大家分享表格制作和数据统计分析的技巧与方法，希望大家的工作更便捷，更轻松！
相关推荐
- 苹果新macOS、新Mac还没出，但已经有新版虚拟机软件Parallels Desktop 19
-
自从苹果电脑全面转向ARM架构芯片之后，想在新款Mac电脑上安装Windows或Linux系统，就只能依靠虚拟机软件了，其中ParallelsDesktop应该是比较多Mac用户选择使用的一款，现在...
- 这个开源神器可快速帮你安装 MacOS 虚拟机
-
大家好，我是JackTian。安装Windows和Linux操作系统是最熟悉不过的必备技能了。那么，给大家推荐一个非常实用的开源脚本：macos-guest-virtualbox.sh，帮你...
- 如何在VMware虚拟机上安装运行Mac OS系统??
-
想在自己的Windows电脑上安装一个MacOS体验一下苹果系统的小伙伴，教程来了！！！一、安装前准备虚拟机运行软件：VMwareWorkstationPro，版本：16.0.0。（可以注册）VM...
- 效率!MacOS下超级好用的Linux虚拟工具:Lima
-
对于MacOS用户来说，搭建Linux虚拟环境一直是件让人头疼的事。无论是VirtualBox还是商业的VMware，都显得过于笨重且配置复杂。今天，我们要介绍一个轻巧方便的纯命令行Linux虚拟工具...
- 普通电脑安装苹果MacOS+Windows10双系统，这次可不是虚拟机
-
上篇文章中说到，有一朋友因为工作需要，得临时使用苹果系统，笔者给他用VmwareWorkStation安装了一个苹果系统的虚拟机，结果装是装上了，但是发现调整分辨率有点小问题，文件传输也不方便。虽说...
- 官方证实苹果M1芯片不支持Windows 11
-
中关村在线消息：近日根据微软官方透露，目前已经确定Windows11不支持运行在苹果M1芯片上，这意味着过往在Mac电脑上安装Windows系统的做法在M1芯片的Mac电脑上并不适用。不过此前有网友...
- 这可能是 Mac 共享文件最详细的教程了
-
如果希望让一台Mac访问另一台Mac上的文件，就可以使用Mac的文件共享功能。而且不仅是Mac之间，甚至用iPhone、iPad、WindowsPC都可以访问Mac的共享文件...
- 在 M1/M2 Mac 上，让 Windows 11 免费“跑”起来
-
自从苹果在产品中逐步使用自研的M系列芯片淘汰掉英特尔芯片之后，很多事情都发生了改变。作者|KirkMcElhearn和JoshuaLong译者|弯月出品|CSDN（ID：CS...
- VMware Workstation克隆虚拟机后修改ip地址和mac地址
-
VMwareWorkstation克隆虚拟机，登录之后发现，克隆虚拟机不仅用户名相同，连ip地址、mac地址也是相同的，很显然访问相同ip地址的虚拟机是会出现ip地址冲突的。一、修改IP地址这就需要...
- VirtualBox7中安装macOS big sur，在windows10&11上「保姆级教程」
-
macOSBigSur是苹果公司研发的桌面端操作系统，于北京时间2020年6月23日在2020苹果全球开发者大会上发布。BigSur采用全新的精美设计，为主要app如Safari浏览器...
- 最强mac虚拟机Parallels Desktop 16 有哪些重要的新增功能?
-
ParallelsDesktop16正式发布，软件带来了一些显着的新功能和性能增强，包括对macOSBigSur的全面支持。当苹果推出macOSBigSur时，它终止了对Par...
- 关于在MacOS安装虚拟机的全过程（macos 安装虚拟机）
-
哈喽大家好，我是咕噜美乐蒂，很高兴又见面啦！下面美乐蒂将详细地给大家介绍一下在macOS上使用VMwareFusion创建虚拟机并安装操作系统的步骤：一、确认虚拟化支持：首先，确认你的Ma...
- macOS上也能轻松运行Win系统的虚拟机，你还不知道吗?
-
在macOS系统上运行Win系统的方式，虚拟机篇吉安光头强原创你是否曾经为了在Mac上运行Windows系统而烦恼不用着急，下面我将分享一种简单易行的方法，让你轻松在Mac上运行Windows系统准备...
- Mac M芯片上安装统信UOS 1070arm64虚拟机
-
原文链接：MacM芯片上安装统信UOS1070arm64虚拟机Hello，大家好啊！今天给大家带来一篇关于如何在苹果M系列芯片的Mac电脑上，通过VMware安装ARM64版统信UOS1070...
- 虚拟机不好用?Mac mini 多配一台Windows电脑，用远程桌面更好!
-
最近新入手了MacminiM4款，这里来更新一下相关问题，对于还没有购买Macmini，但是又想要用苹果电脑的朋友，一些参考，我觉得还是挺有用的！Macmini选择哪个渠道购买好？现在比较划算...
欢迎 你 发表评论:
- 一周热门
- 最近发表
-
- 苹果新macOS、新Mac还没出，但已经有新版虚拟机软件Parallels Desktop 19
- 这个开源神器可快速帮你安装 MacOS 虚拟机
- 如何在VMware虚拟机上安装运行Mac OS系统??
- 效率!MacOS下超级好用的Linux虚拟工具:Lima
- 普通电脑安装苹果MacOS+Windows10双系统，这次可不是虚拟机
- 官方证实苹果M1芯片不支持Windows 11
- 这可能是 Mac 共享文件最详细的教程了
- 在 M1/M2 Mac 上，让 Windows 11 免费“跑”起来
- VMware Workstation克隆虚拟机后修改ip地址和mac地址
- VirtualBox7中安装macOS big sur，在windows10&11上「保姆级教程」
- 标签列表
-
- 如何绘制折线图 (52)
- javaabstract (48)
- 新浪微博头像 (53)
- grub4dos (66)
- s扫描器 (51)
- httpfile dll (48)
- ps实例教程 (55)
- taskmgr (51)
- s spline (61)
- vnc远程控制 (47)
- 数据丢失 (47)
- wbem (57)
- flac文件 (72)
- 网页制作基础教程 (53)
- 镜像文件刻录 (61)
- ug5 0软件免费下载 (78)
- debian下载 (53)
- ubuntu10 04 (60)
- web qq登录 (59)
- 笔记本变成无线路由 (52)
- flash player 11 4 (50)
- 右键菜单清理 (78)
- cuteftp 注册码 (57)
- ospf协议 (53)
- ms17 010 下载 (60)