第1个回答 2008-05-09
FIND(find_text,within_text,start_num)
返回要查找的字符串的index为0的位置
start_num<=0 or start_num<within_text长度
返回#Value
eg:FIND("1",F10,0)=#Value
若字符串未找到,就return #Value
FIND("0",F10,1)=#Value
区分大小写的前提夏进行相应的查找
eg:FIND("m","Miriam McGovern")=6
第2个回答 2008-05-09
'当前表单中添加代码运行下面的代码,就出来了,
'注意代码中使用了C列,D列.
'C列中记录B当前单元格在A列中有匹配值,写1
'在D列中记录A列中有匹配时,并写入匹配值
'再看表单就易操作了.
Sub FindSub()
For Each a In Range("B:B")
If a = "" Then Exit Sub
With Range("a:a")
Set c = .Find(a, LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
Cells(a.Row, 3) = 1 '在C列中写入B当前单元格在A列中有匹配值,写1
Cells(c.Row, 4) = a '在D列中A列中有匹配时,并写入匹配值
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
Next
End Sub
第3个回答 2008-05-09
在C列中输入,=IF(SMALL(IF(ISNUMBER(FIND(B1,$A$1:$A$500)),ROW($1:$500)),ROW(1:1))>0,"此数字出现在A"&SMALL(IF(ISNUMBER(FIND(B1,$A$1:$A$500)),ROW($1:$500)),ROW(1:1)),"")
就出现结果了
第4个回答 2008-05-09
假设A1到A8是数据,B列中存放要查找的数据。
1、追加C列
内容是:=(CHAR(64+COLUMN(A1))&ROW(A1))
2、在D列中加入:
=VLOOKUP(B1,$A$1:$C$8,3)
这样,D列中显示的值,就是B列中数字在A列中所对应的位置。