vb中在excel中搜索一个值并激活这个值所在单元格 如何做啊

vb中在excel中搜索一个值并激活这个值所在单元格 如何做啊
b中在excel中搜索一个值并激活这个值所在单元格的行号和列号 如何做啊

通过录制宏的功能,可以用下面的代码试试:

    Cells.Find(What:="0.84181712962963", After:=ActiveCell, LookIn:= _
        xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
        xlNext, MatchCase:=False, MatchByte:=False, SearchFormat:=False).Activate
    Cells.FindNext(After:=ActiveCell).Activate'其中0.84181712962963为想要搜索的数据追问

那如何读取行号和列号啊 把行号 赋给一个变量

Range("A:A").Find(what:=u).Activate 这样写是否有错误

追答Cells.FindNext(After:=ActiveCell).Row'为行号
Cells.FindNext(After:=ActiveCell).Column'为列号追问

Range("A:A").Find(what:=u).Activate
m = ActiveCell.Row
n = ActiveCell.Column

这样写是否有错误

追答

试过了,可以,简化后正是这样,谢谢~

追问

为什么我这边不行 我得出的m不是我表表格里的行数 这个m定义成什么类型?

追答

对,如果你要用m,n的话,得事先定义
Dim m,n
就可以了

温馨提示:内容为网友见解,仅供参考
无其他回答
相似回答