findnextfile vba中findnext怎样才能嵌套使用?
浏览量:3026
时间:2021-03-17 10:46:24
作者:admin
vba中findnext怎样才能嵌套使用?
findnext的使用条件是:搜索的单元格范围、内容和其他设置与上一次查找相同,例如:public sub ifind() dim C as range,RNG as range,S$,Iadd$,MSG$,n&r set RNG=range(“A:A”)r S=“ABC”r with RNG/r set C=。查找,。单元格(细胞。计数),xlValues,xlWhole) 如果不是c,则/r Iadd=c.address(0,0)r do/r n=n 1/r MSG=MSG&vbcrlf&c.address(0,0)r set c=。Findnext(c)“如果条件保持不变,则使用Findnext/r如果c为nothing,则退出do/r循环,直到Iadd=c.address(0,0)r end if/r end with/r msgbox”!共“&;n&”,共“&;S&”:“&;vbcrlf&;MSG/R End Sub
findnextfile vba的findnext _findnext
版权声明:本文内容由互联网用户自发贡献,本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。