Office中国论坛/Access中国论坛

标题: 请版主或高手指教:如何用Match函数获取查找值所在单元格的行号 [打印本页]

作者: 余瑞龙 时间: 2005-1-26 04:44
标题: 请版主或高手指教:如何用Match函数获取查找值所在单元格的行号
一个工作簿中有两个工作表:"表一" 和 "数据表一",当"表一"的 B3 单元格的值改变时,我想用Match函数在 "数据表一"中的 A2:CK43 区域找到 B3 的值(肯定能找到!),并获取查找值所在单元格的行号,试着写了如下几个语句,但就是出错,请版主或那位高手指教一下我,应如何写出正确的语句.

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Row = 3 And Target.Column = 2 Then

Dim row1

row1 = Application.WorksheetFunction.Match([b3], Worksheets("数据表一").Range("A2:CK43"), 0)

End If

End Sub

[attach]8770[/attach]

作者: 老鬼 时间: 2005-1-26 05:22
row1 = Application.WorksheetFunction.Match([b3], Worksheets("数据表一").Range("A2:A43"), 0)

作者: 余瑞龙 时间: 2005-1-28 00:29
谢谢啦！

作者: glober609 时间: 2005-1-28 00:54
老鬼，我太佩服你了！！没有你解决不了的问题！！！向你学习！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)