使⽤vlookup查时，如果有重复值，怎样返回第⼆个查到的值呢？vlookup函数业查时，如果有重复值，总是返回第⼀个查到的值，现在我就想⼀个问题，如果有重复值，怎样返回第⼆个查到
的值呢？
如图所⽰，怎样设置公式，查20时，如果有没有重复就正常查，如果有重复就返回第⼆个结果——“冯某”。
查询.rar (3.13 KB, 下载次数: 89)
01. =INDEX(B:B,SMALL(IF(A$1:A$93=D$1,ROW($1:$93),4^8),ROW()))&""
=INDEX(B:B,SMALL((A2:A93<>D1)/1%+ROW(2:93),2))
========================================================
怎样引⽤重复数据对应的不同数值到另⼀张表中？
引⽤的数据是竖列的，希望变成横排的到另⼀张表中，⼤概是下⾯的意思：
g66 46
g66 50
g66 30
h53 66
h53 88
u30 45
u30 25
u30 32
u30 40vlookup函数8种用法
变成
g66 46 50 30
h53 66 88
u30 45 25 32 40
⽊有简单⼀点的⽅法吗，vba什么的也太⿇烦了。。。
不⽤VBA的⽅法未必简单，可能需要很多步骤，很费事；⽤VBA实现通常只需要按照两三个步骤粘贴好代码，然后执⾏⼀下就可
以了。
请打开“⼯具——宏——visual basic 编辑器”，在出现的窗⼝中，左侧栏⽬内，“microsoft excel 对象”栏⽬上点击右键，选择“插⼊——模块”，然后在右侧空⽩窗⼝中，粘贴以下代码，然后按键盘上的F5执⾏：
Sub 分类并转置()
Dim i, j, k As Integer
i = 1
j = 1
k = 5
For i = 1 To Worksheets(1).Range("a1:a" & [a65536].End(xlUp).Row).Rows.Count
If i = 1 Then
j = 1
Worksheets(1).Cells(j, k - 1).Value = Worksheets(1).Cells(i, 1).Value
Worksheets(1).Cells(j, k).Value = Worksheets(1).Cells(i, 2).Value
k = k + 1
End If
If Worksheets(1).Cells(i, 1).Value <> Worksheets(1).Cells(i + 1, 1).Value Then
j = j + 1
k = 5
Worksheets(1).Cells(j, k - 1).Value = Worksheets(1).Cells(i + 1, 1).Value
Worksheets(1).Cells(j, k).Value = Worksheets(1).Cells(i + 1, 2).Value
k = k + 1
End If
If Worksheets(1).Cells(i, 1).Value = Worksheets(1).Cells(i + 1, 1).Value Then
Worksheets(1).Cells(j, k).Value = Worksheets(1).Cells(i + 1, 2).Value            k = k + 1
End If
Next
End Sub

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。