Excel下拉项选中后只保留选中项的部分内容

2018-03-02 · 🙈Lei · 0条 · 558次

问题

最近公司的项目需要做一个Excel的模板,要求Sheet1中的某一列以Sheet2中的A,B两列合在一起的内容作为选项,但是选择完成后只显示Sheet2中B列的内容。

示例图

解决步骤

1.建立辅助列

在Sheet2中新建1列,作为辅助列,该列的内容是Sheet2中A,B两列合在一起用-连接构成的。如下如所示

2.数据验证

选中要设置下拉项的一列,然后在菜单栏数据中选择数据验证。

数据验证对话框中的来源选择第1步中在Sheet2中生成的新列的内容。

到这里我们就已经完成了下拉列表的编辑,下拉列表中的内容是Sheet2中新生成的辅助列的内容。

3.编辑代码

在Sheet1上右键选择查看代码,

输入如下代码

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Row > 1 And Target.Column = 16 And Target <> "" Then
Application.EnableEvents = False
Target = Split(Target, "-")(1)
Application.EnableEvents = True
End If
End Sub

注意:其中Target.Row > m And Target.Column = n,其中m代表从第几行开始,n代表下拉选项是第几列

然后按Ctrl+s保存,会弹出下面的提示框,点击“否”。

在弹出的另存为提示框中,将保存类型更换为Excel启用宏的工作簿(后缀名为.xlsm)。


  1