vbafind函数的使用方法
打开Excel，按下Alt+F11，进入VBA编辑界面，如下图所示。
可以直接对Range区域使用find方法，如下图所示。
可以看到find方法中有很多参数，但多数都是可选参数，而必选参数只有what，也就是查值一个，如下图所示。
 
这里，我们写代码实现在区域A1：A10中查第一个含有“龙”字的单元格，并显示器行号，关键代码Range("A1:A10").Find("龙").Row，如下图所示。
rows函数的使用方法及实例
按下“运行子程序”按钮，就会弹出对话框，提示第一个含有“龙”字单元格的行号，如下图所示。
 
拓展资料：
Excel VBA中Find函数的基本用法。Find函数就是Excel表格中的查功能，我们可以通过录制宏的方法来获得Find的代码。
Sub Macro1()
Cells.Find(What:="A", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Activate
Cells.FindNext(After:=ActiveCell).Activate
End Sub
从上面可以看到Find函数共有8个参数，分别对应Excel表格查里面选项的各个项目，这里我就不多说了，感兴趣可以自己试下，其中只有一个参数是必须的，那就是"What"，即你要的内容。下面我们来看整理之后的代码
Sub Find演示()
Dim rng
Set rng = ActiveSheet.UsedRange.Find(What:="A")
'MsgBox "字母A地址为" & rng.Address(0, 0)
'MsgBox "字母A所在行为" & rng.Row
MsgBox "字母A所在列为" & rng.Column

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。