如果将表2的数据从表1中提取出来（满足一定条件）

liuxb0221

招聘数据提取.zip (18.04 KB, 下载次数: 49)

2012-3-19 22:53 上传

点击文件名下载附件

希望得到的结果是：将招聘明细工作表已被录用的人员的联系电话按报到工作表中有明细自动提取出来。（为使表格美观，只将符合条件的电话号码提取出来，未能进取的错误值为空格显示）

lxlmul

是否是这样！

tt253605057

vba解法
招聘明细中写入代码：

1. Sub test()
   
2.     Dim arr, brr(), J%
   
3.     arr = Range("A1").CurrentRegion
   
4.     For H = 1 To UBound(arr)
   
5.         If arr(H, 4) = "是" Then
   
6.             J = J + 1
   
7.             ReDim Preserve brr(1 To 3, 1 To J)
   
8.             brr(1, J) = J
   
9.             brr(2, J) = arr(H, 2)
   
10.             brr(3, J) = arr(H, 3)
    
11.         End If
    
12.     Next
    
13.     Sheet2.Range("A2").Resize(J, 3) = Application.Transpose(brr)
    
14. End Sub
    

复制代码

tt253605057

函数解法：A2=ROW()-1
               B2=INDEX(招聘明细!B:B,SMALL(IF(招聘明细!D:D="是",ROW(招聘明细!D:D),4^8),A2))      数组公式，按ctrl+shift+enter键结束
               C2=VLOOKUP(B2,招聘明细!B:C,2,0)

opai2629

C2=IF((VLOOKUP(B2,招聘明细!B3:D12,3,0))="否","",VLOOKUP(B2,招聘明细!B3:C12,2,0))
下拉公式。

liuxb0221

tt253605057 发表于 2012-3-19 23:49
函数解法：A2=ROW()-1
               B2=INDEX(招聘明细!B:B,SMALL(IF(招聘明细!D:D="是",ROW(招聘明细!D ...

怎么将#N/A变成空格或者“-”啊，#N/A太影响整个表格查看了。

liuxb0221

tt253605057 发表于 2012-3-19 23:49
函数解法：A2=ROW()-1
               B2=INDEX(招聘明细!B:B,SMALL(IF(招聘明细!D:D="是",ROW(招聘明细!D ...

怎么将#N/A变成空格或者“-”啊，#N/A太影响整个表格查看了？

tlzhh

阅读才查看下载