FindPrevious 方法 - Microsoft Excel Visual Basic 2002 参考

返回介绍

FindPrevious 方法

发布于 2019-08-07 字数 1480 浏览 847 评论 0

继续执行用 Find 方法启动的搜索。查找匹配相同条件的前一个单元格并返回代表单元格的 Range 对象。不影响选定区域或当前单元格。


expression.FindPrevious(After)


expression 必需。该表达式返回一个 Range 对象。


AfterVariant 类型,可选。指定一个单元格,查找将从该单元格之前开始。此单元格相应于从用户界面查找时的活动单元格位置。注意,After 必须是查找区域中的单个单元格。请记住查找是从该单元格之前开始的;直到本方法环绕到此单元格时,才检测其内容。如果未指定本参数,查找将从区域的左上角单元格之前开始。


说明


当查找到指定查找区域的起始位置时,本方法将环绕至区域的末尾继续搜索。发生环绕后,为停止查找,可保存第一次找到的单元格地址,然后测试下一个查找到的单元格地址是否与其相同。


示例


本示例演示 FindPrevious 方法如何与 Find 方法和 FindNext 方法共用。运行本示例之前,请确保 Sheet1 的 B 列中至少出现过两次“Phoenix”。

Set fc = Worksheets("Sheet1").Columns("B").Find(what:="Phoenix")
MsgBox "The first occurrence is in cell " & fc.Address
Set fc = Worksheets("Sheet1").Columns("B").FindNext(after:=fc)
MsgBox "The next occurrence is in cell " & fc.Address
Set fc = Worksheets("Sheet1").Columns("B").FindPrevious(after:=fc)
MsgBox "The previous occurrence is in cell " & fc.Address

上一篇:FindNext 方法

下一篇:Flip 方法

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

支持 Markdown 语法,需要帮助?

目前还没有任何评论,快来抢沙发吧!