快好知 kuaihz

Vba代码集锦--find方法(1)

Sub find1()

"在指定区域查找第一个符合条件的单元格

aaa = Range("A:A").Find("特定值").Row  "返回A列第一个出现特定值的单元格行值

bbb = [D:E].Find("特定值").Address  "按照先行后列的方式从多列查找特定值出现的第一个单元格

ccc = Range("D:E").Find("特定值", AFTER:=Range("D1")).Address  "从特定位置往后查找,若无到结尾后会从开始循环。如果函数的名称中含要查找的字符,会返回该公式所在单元格

ddd = [A:F].Find("特定值", LookIn:=xlValues).Row "在指定区域的单元格值中查找第一个包含特定值的单元格

eee = [A:F].Find("特定值", LookIn:=xlValues, AFTER:=Range("E4")).Row "结合上述两种

fff = [A:F].Find("C2", LookIn:=xlFormulas).Address  "在指定区域中查找引用C2的第一个公式所在单元格

ggg = [D:E].Find("特定值", LookIn:=xlValues, LOOKAT:=xlPart).Address "模糊查找从第二个单元格开始找,默认是模糊查找,精确匹配查找是xlwhole

hhh = Range("A:F").Find("特定值", LookIn:=xlValues, LOOKAT:=xlWhole, SEARCHORDER:=xlByRows).Address "先行后列,先列后行是xlByColumns

iii = Range("A:F").Find("特定值", , xlValues, xlWhole, xlByColumns, xlPrevious).Address "从后往前找,从前往后是xlNext

jjj = Range("A:F").Find("特定值", , xlValues, xlWhole, xlByColumns, xlNext, False).Address "False是不区分大小写,true是区分大小写

End Sub

----------------------------------------

本站资源来自互联网,仅供学习,如有侵权,请通知删除,敬请谅解!
搜索建议:Vba代码集锦find方法  集锦  集锦词条  代码  代码词条  方法  方法词条  find  find词条  Vba  Vba词条  
综合

 图形化编程娱乐于教,Kitten...

跟很多学生聊过,很多学生不是不努力,只是找不到感觉。有一点不可否认,同样在一个教室上课,同样是一个老师讲授,学习效果迥然不同。关键的问题在于,带入感,我能给出的...(展开)