Excel 查找跳过行或查找同一行_Excel_Vba

Excel 查找跳过行或查找同一行

excel vba

Excel 查找跳过行或查找同一行,excel,vba,Excel,Vba,这是我的Excel文件的一部分（wsPctin code）行数身份证件单位百分比 573 1433 AAA 1. 574 1433 BBB 0 575 1433 CCC 0 576 1435 DDD 1. Find（）下面是一个例子：子测试仪（）将ws作为工作表、rngFind作为范围、f作为范围、v作为范围设置ws=ActiveSheet 设置rngFind=ws.Columns（“a”） v=1433 '查找始终返回到范围的开始，因此在 '确保它开始在第一个单元格中查找的最后

这是我的Excel文件的一部分（

wsPct

in code）

行数身份证件单位百分比 573 1433 AAA 1. 574 1433 BBB 0 575 1433 CCC 0 576 1435 DDD 1.

Find（）
下面是一个例子：
子测试仪（）
将ws作为工作表、rngFind作为范围、f作为范围、v作为范围
设置ws=ActiveSheet
设置rngFind=ws.Columns（“a”）
v=1433
'查找始终返回到范围的开始，因此在
'确保它开始在第一个单元格中查找的最后一个单元格。。。
设置f=rngFind.Find（v，after:=rngFind.Cells（rngFind.Cells.Count）_
查看：=xlother，搜索方向：=xlNext）
不做就做f什么都不是
调试。打印f行
设置rngFind=ws.Range（f.Offset（1，0），ws.Cells（Rows.Count，“A”））
设置f=rngFind.Find（v，after:=rngFind.Cells（rngFind.Cells.Count）_
查看：=xlother，搜索方向：=xlNext）
环
端接头
调查