Excel根据已有数据自动填充输入数据

大家好 想请教一个问题,如图,我在姓名为张1的ID(32)和面积(53)中输入数据,如何让C列中姓名为张1的都在自动输入ID(32)和面积(53)啊?、

采用VBA的方式,就可以实现,步骤如下:

    建立关系对应表(我是在D-F列中建立的关系表)

2.按ALT+F11打开VBA界面,双击sheet1

3.复制下面公式到右面的代码区

Private Sub Worksheet_Change(ByVal Target As Range)
 If Application.Intersect(Target, Range("C:C")) Is Nothing Then End
 If IsError(Application.VLookup(Target, Range("D:F"), 1, 0)) Then
 Target = Target
 Else
 Target = "ID(" & Application.VLookup(Target, Range("D:F"), 2, 0) & ")面积(" & Application.VLookup(Target, Range("D:F"), 3, 0) & ")"
End If
 End Sub

4.另存为“启用宏的工作薄"

完成后在C列输入的结果就如下了

在C4输入张1

按回车变成下面的

注意:Range("C:C"),是判断输入列的值,如果你需要在其他列显示,就更改成其他列

Range("D:F") 是关系表如果数据在其他列就更改成其他列,如果关系表不在此工作表中,在Range("D:F")前面加入Worksheets("工作表名称")  比如:Worksheets("sheet2").range("D:F")  

温馨提示:答案为网友推荐,仅供参考
第1个回答  2017-09-25
简单,“=IF(C2="张1",$A$2*$B$2," ")”把它复制到D2单元格。
相似回答