关于VBA中的.Find方法的问题

时间:2017-12-14 14:16:31

标签: excel vba

在这行代码中

w6 = Range(NewNewNewDataColumn & MOPNumber":" & NewNewNewDataColumn).Find(What:=w5, after:=Range(NewNewNewDataColumn & 1), searchdirection:=xlPrevious).Row

我在

的专栏中寻找w5
Row 1 = 25 
Row 2 = 24 
Row 3 = 23 
.
.
. 
Row 26 = 0 
Row 27 = 1 
Row 28 = 2 
.
.
.
Row 49 = 23
Row 50 = 48 
Row 51 = 25 

使用此方法,因为这些数字是包含有用信息的单元格的参考点。

其中w5是0到25的数字。对于一个稍微重要的问题,工作正常,而不是找到数字" 1"它的罚款首次提到1,所以在这种情况下" 21"因此,将返回数字21的行号而不是数字1.是否有办法更改代码以搜索整个w5的提及。那有意义吗?

感谢您提供的任何帮助 马克

1 个答案:

答案 0 :(得分:0)

w6 = Range(NewNewNewDataColumn & ":" & NewNewNewDataColumn).Find(What:=w5, after:=Range(NewNewNewDataColumn & 1), LookAt:=xlWhole, searchdirection:=xlNext).Row

上面是我使用并解决它的代码行,LookAt:=xlWhole i belive是该行中的关键语句,使代码能够按预期工作。