Question

excel 如何在一个表中显示另一个表指定列（如A)包含某一字段的所有记录

此表格实际有数千条记录





Answer 1

sheet1是原有数据表A列是目标列,  sheet2 是输出表A列是输出列   "XXX"是要找的字段

满足你的需求，输入什么编号就输出什么编号全部的查询结果
sub checkinfor()
dim n as long
dim x,y as long
dim str as string
'-------------清空上次查询结果记录
for x= sheets("sheet2").usedrange.rows.count to 2
sheets("sheet2").rows(x).delete
next x
'-------------查询并输出结果
str=inputbox("请输入查询的编号，并确定")
n=sheets("sheet1").usedrange.rows.count
y=2
for x=2 to n
if instr(1,sheets("sheet1").cells(x,"A"),str,vbTextCompare)>0 then
sheets("sheet2").cells(y,"A").resize(1,11).value=sheets(1).cells(x,"A").resize(1,11).value
y=y+1
end if
next x
end sub

Answer 2

1、 引用其他工作表的单元格：工作表名称+“!”+单元格名称。
例如： Sheet1!A1+Sheet2!B1 ==== 将Sheet1 中的A1 的数据和Sheet2 中的B1 的数据相加；
2、利用函数 Find ;
3、利用语句 if ；
4、注意使用 IsError,以避免Execel显示错误信息。

Answer 3

可以用下面这段VBA程序完成。假设需要显示包含XXX的所有记录
sub test()
Dim i%,j%,r%,k%
r=sheet1.cells(rows.count,1).end(xlup).row
k=1
for i=1 to r
if instr(Sheet1.cells(i,1),"XXX")>0 then

Sheet2.cells(k,1)=Sheet1.cells(i,1)

k=k+1

end if

next
end sub

Answer 4

可以用vlookup 函数试试

Answer 5

=Sheet2!A1