设为首页收藏本站

简字体切换切换到宽版

ExcelHome技术论坛»论坛 › Office/Excel 行业应用交流与培训 › Excel人力资源管理 › 表1的底薪参考表2的底薪一次性拉相对性的数据

EH技术汇-专业的职场技能充电站	妙哉！函数段子手趣味讲函数	Excel服务器-会Excel,做管理系统	效率神器，一键搞定繁琐工作
HR薪酬管理数字化实战	Excel 2021函数公式学习大典	Excel数据透视表实战秘技	打造核心竞争力的职场宝典
让更多数据处理，一键完成	数据工作者的案头书	免费直播课集锦	ExcelHome出品 - VBA代码宝免费下载
	用ChatGPT与VBA一键搞定Excel	WPS表格从入门到精通	Excel VBA经典代码实践指南

发新帖

查看: 1022|回复: 4

[求助] 表1的底薪参考表2的底薪一次性拉相对性的数据

TA的精华主题

TA的得分主题

发表于 2015-9-20 15:37 | 显示全部楼层 |阅读模式

[广告] ★Excel Home云课堂 - 专业的职场技能充电站★ ★Excel三大利器★ ★ 笨办法学VBA全系列★

名称	职位	底薪
JM0556	初级店长
JM0556	初级店长
JM0556	初级见习店长
JM0556	初级组长
JM0556	初级防损员
JM0556	高级店员
JM0556	高级店员
JM0601	初级店长
JM0601	初级店长
JM0601	初级见习店长
JM0601	初级组长
JM0601	初级防损员
JM0601	高级店员
JM0739	初级店长
JM0739	初级店长
JM0739	初级见习店长
JM0739	初级组长
JM0739	初级防损员
JM0739	高级店员
JM0739	高级店员
JM0739	高级店员
JM0739	高级店员
JM0739	高级店员
JM0739	高级店员
JM0825	初级店长
JM0825	初级店长
JM0825	初级见习店长
JM0825	初级组长
JM0825	初级防损员
JM0825	高级店员
MC0310	初级防损员

序号	代码	初级店长	初级见习店长	中级见习店长	高级见习店长	中级组长	高级店员	初级防损员
1	JM0556	3600	2300	2600	3000	3200	3000	2600
2	JM0601	3600	2300	2600	3000	2500	2500	2600
3	JM0739	4000	2500	2800	3200	2700	2700	3000
4	JM0825	3000	2200	2400	2800	2300	2200	2400
5	MC0310	3000	2200	2400	2800	2300	2200	2400
6	JM0572	3000	2200	2400	2800	2300	2200	2400
7	JM0751	4000	2500	2800	3200	2700	2700	3000
8	JM0971	4000	2500	2800	3200	2700	2700	3000
9	JM0976	3600	2300	2600	3000	2500	2500	2600
10	JM1046	3600	2300	2600	3000	2500	2500	2600
11	JM1092	3600	2300	2600	3000	2500	2500	2600
12	JM1136	3000	2200	2400	2800	2300	2200	2400
13	JM1140	3600	2300	2600	3000	3200	3000	2600

第一次发帖，不太会使用。
急需表哥表姐求救。
表1的底薪参考表2的底薪一次性拉相对性的数据

因为我平常都是用vlookup按职位拉几次数据，我这个办法有点麻烦，求打救！！！感谢！！！！

代码, 底薪, 参考, 参考表, 一次

回复

TA的精华主题

TA的得分主题

发表于 2015-9-21 14:04 | 显示全部楼层

[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件 ★免费下载 ★ ★ 使用帮助★

上传个附件，模拟些数据最好

回复

TA的精华主题

TA的得分主题

发表于 2015-9-22 20:35 | 显示全部楼层

[广告] ★会Excel,就能做支持PC、手机、Web、App、Windows、安卓、IOS、Linux信息一体化的各种管理系统 ★

Sub 对应的底薪()
Dim sht, sht1 As Worksheet, i, n, m, x As Integer
Set sht = ThisWorkbook.Worksheets(1)
Set sht1 = ThisWorkbook.Worksheets(2)
i = 1
Do While sht1.Cells(1, i).Value <> ""
For n = 2 To sht.Cells(Rows.Count, 2).End(xlUp).Row
If sht1.Cells(1, i).Value = sht.Cells(n, 2).Value Then
For m = 2 To sht1.Cells(Rows.Count, 1).End(xlUp).Row
If sht.Cells(n, 1).Value = sht1.Cells(m, 2).Value Then
sht.Cells(n, 3).Value = sht1.Cells(m, i).Value
End If
Next
End If
Next
i = i + 1
Loop
End Sub

复制代码

回复

TA的精华主题

TA的得分主题

发表于 2015-9-23 08:11 | 显示全部楼层

[广告] ★ 对Excel用户最友好的数据分析编程语言，再不发愁Excel计算困难和容量限制 ★

双条件查找：

=INDEX(Sheet2!$C$2:$I$14,MATCH(A2,Sheet2!$B$2:$B$14,),MATCH(B2,Sheet2!$C$1:$I$1,))

复制代码

回复

TA的精华主题

TA的得分主题

发表于 2015-9-23 17:35 | 显示全部楼层

[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★使用手册★

用楼上的INDEX()+MATCH()可以解决

用VLOOKUP()+MATCH()也可以，如下图所示——
QQ截图20150923173515.png

QQ截图20150923173515.png

回复

发新帖

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-23 00:43 , Processed in 0.033856 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号沪ICP备11019229号-2

本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！本站特聘法律顾问：李志群律师

快速回复 返回顶部 返回列表