VBA 利用VBA查找Excel单元格内容备忘

What后的内容是要查找的文本。

lookat是查找的模式,xlWhole:是一致匹配查找,xlPart:是部分匹配查找。

需要注意的是需要判断查找的Range是否存在,不进行判断直接用的话容易发生错误。

vbscript 复制代码
Sub FindCell()
    Dim rngFind As Range
    
    
    Set rngFind = ActiveWorkbook.Sheets("test").Cells.Find(What:="ab", lookat:=xlWhole)
    If rngFind Is Nothing Then
        MsgBox "Not found."
    Else
        MsgBox "Row:" & rngFind.Row & vbNewLine & "Column:" & rngFind.Column
    End If
    
End Sub
相关推荐
Access开发易登软件10 天前
Access开发导出PDF的N种姿势,你get了吗?
后端·低代码·pdf·excel·vba·access·access开发
課代表10 天前
VBA 中的 Excel 工作表函数
excel·vba·函数·对象·属性·range·静态变量
Lilixxs11 天前
VBA 中使用 ADODB 操作 SQLite 插入中文乱码问题
数据库·中间件·sqlite·乱码·vba·odbc·adodb
只会HelloWorld的华娃23 天前
VBA模板记录
microsoft·vba
Access开发易登软件1 个月前
Access开发右下角浮窗提醒
microsoft·vba·access·access开发
Access开发易登软件2 个月前
Access开发一键删除Excel指定工作表
服务器·前端·后端·excel·vba·access·access开发
Prodigy_kyw2 个月前
VBA初学3----实战(VBA实现Excel转csv)
excel·vba·csv
yivifu3 个月前
利用VBA将Word文档修改为符合EPUB3标准规范的HTML文件
word·vba·epub
Learn-Share_HY4 个月前
[Excel VBA]如何製作買三送一優惠條件的POS結帳介面?
excel·vba·office·自動化·自動化辦公
shandianchengzi4 个月前
【工具】Quicker/VBA|PPT 在指定位置添加有颜色的参考线
powerpoint·vba·ppt·quicker