在A列，有多个单元格（比如A10,A20,A70）的值是“编写人”，我事先不知道这些单元格的地址，请问用VBA如何得到这些单元格的地址？cells(10，1)，cells（20，1），cells（70，1）

答案或建议：

dim c as range,s as string,t$,arr
set c=sheets(1).[A:A].find("编写人",lookin:=xlvalues)
if not c is nothing then
s=c.address
do
t=t & "," & c.address
set c=sheets(1).[A:A].findnext(c)
loop while not c is nothing and s<>c.address
end if

arr=split(right(t,len(t)-1),",")


arr这个数组里存放的就是所有找到的单元格地址。
文章转载请保留：http://www.baikewenda.com/h/0904/a35581.html