作者:乔山办公网日期:
返回目录:excel表格制作
在C3单元格输入L,自动变为B列为L对应的知A列内容,因为输入和输出在同一单元格,必须通过VBA代码实现。
如图,按Alt+F11,将以下代码粘贴到右侧代码框道中:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
With Worksheets(1).Range("B1:B500")
Set c = .Find(Target.Value, LookIn:=xlValues)
If Not c Is Nothing Then Target.Value = c.Offset(0, -1)
End With
End If
在A1:B500输入对应的姓名和代码规则,然后在C列单元格输入L,按回车后就自动变为版对应的李四。输入K就变孔子。(注权:上述代码仅在C列有效,如果要在其他区域,将第一句代码中Target.Column = 3改为Target.Column >2即可,表示在C列及后面的所有列)
D列为3的对应行F列数据,有两种zd简单的公式,一是当多个满足条件的去第一个结果用VLOOKUP,公式为专:
=VLOOKUP(3, D:F, 3, 0)
二是当有多个满足条件的情况是,把这些行F列的结果加起来,使用属SUMIF,公式为:
=SUMIF(D:D, 3, F:F)