查找-VLookup

系统：Windows 7
软件：Excel 2010

学习路径图：
查找-VLookup

针对之前的学习路径图，会针对的写一些文章

今天讲讲常见的表内查找：VLookup。这个很多人应该比较熟悉了，在Excel公式中也经常用到

效果动图
查找-VLookup

Part 1：示例

这个示例和上一次说的match，效果上看起来一样

Part 2：代码

Sub 查询成绩()
    studentName = InputBox("请输入拟查询人员姓名")
    Debug.Print (studentName)
    
    Set sht = ThisWorkbook.Worksheets("示例")
    Set rngName = sht.Range("A:C")

    yuwen = Application.VLookup(studentName, rngName, 2, False)
    shuxue = Application.VLookup(studentName, rngName, 3, False)
    
    If IsError(yuwen) Then
        MsgBox "未查询到该人员信息"
    Else
        MsgBox studentName & Chr(13) & Chr(10) & "语文成绩：" & yuwen & "，数学成绩：" & shuxue
    End If
    
End Sub

代码截图
查找-VLookup

输出结果
查找-VLookup

Part 3：部分代码解读

yuwen = Application.VLookup(studentName, rngName, 2, False)，三个参数分别为：拟查询信息，拟查询区域，返回哪一列，查询方式。
- 拟查询值与拟查询区域的第一列进行比对，找到对应行
- 返回指定列对应行的数据
- 查询方式：False表示精确匹配

数据源
查找-VLookup

如需文中高清并可以无限放大路径图，可以文后留言留下邮箱，小编会发过去
本文为原创作品，如需转载，可加小编微信号learningBin

更多精彩，请关注微信公众号
扫描二维码，关注本公众号

查找-VLookup

Part 1：示例

Part 2：代码

Part 3：部分代码解读

相关推荐