中关村在线

首页 排行 新品 问答 下载 论坛 手机 笔记本 数码相机 主板 显卡 平板电脑 更多

怎么在ex来自cel中制作下拉菜单

举报
如何在excel中制作下拉菜单,如,日期,点开后有 下拉菜单1月,2月,3月,4月选择~
讨论回答 (4)
hery130
59702405
xiansong04
excel如何制作下拉列表?相信很多经常使用excel的用户都会碰到这个问孩角响边井题,今天小编给大家讲讲制作方法,希望能帮助你,让你更加专业的制作出各种excel文档。
 

 
excel制作下拉列表教程
 
在Excel中制作下拉列表能够通过数据有效性、使用窗体控件与VBA控件工具箱中的组合框来制作。下面我们用一个具体的例子来进行说明(在文章结尾处可下载xls格式的示例文件)。假如我们每个月都有一个工资表,其中每个员工的工资按照其出勤天数每个月都不相同。
我们需要制作一个“个人工资表”来查看每个人每个月的工资情况,这时就可以制作一个包含员工姓名下拉列表,在其中进行选择来查看指定员工每个月的工资情况。
方法一:使用数据有效性
通过数据有效性能够在单元格中提供一个下拉箭头,单击下拉箭头会弹出下拉列表。由于员工姓名都在每月的工资表中,而“个人工资表”中没有这些人员姓名,因此我们必需先定义名称,以便在“个人工资表”中设置数据有效性时进行引用。
定义名称的途径是单击短入想菜单“插入→名称”,在定义名称对话框中进行定义,这里将“1月工资”表中的姓名区域B3:B14空定义为“姓名”,如图。
1.假如下拉列表放在“个人工资表”的C1单元格,选择C1单元格,然后单击菜单“数据→有效性”,选择“设置”选项卡,在“有效性条件”区域中“允许”下方的下拉列表中选择“序列”。
2.在“来源”下方的文本框中输入“=姓名”。单击“确定”。
3.在数据区C3:H14中用VLOOKUP函数对工资数据进行关联。例如第3行为1月工资,可以在C3单元格中输入公式
=VLOOKUP($C$1,‘1月工资’!$B$3:$H$14,2,0)“
在D3单元格中输入公式:
=VLOOKUP($C$1,‘1月工资’!$B$3:$H$14,3,0)
在C4单元格中输入公式:
=VLOOKUP($C$1,‘2月工资’!$B$3:$H$14,2,0)
其余单元格依此类推。这样,只要在单击C1单元格右侧的下拉箭头选择员工姓名就可以查看其所有月份的工资情况。
方法二:用窗体控件
1.在菜单栏上右击,在弹出的菜单中选择”窗体“,将弹出”窗体“浮动工具栏,单击”组合框“控件。
2.将光标放到表格中,这时光标变成细黑十字形,在表格中画一个组合框。
3.右击组合框,在弹出的菜单中选择”设置控件格式“。
在”设置控件格式“对话框中选择”控制“选项卡,设置”数据源“区域为”‘1月工资’!$B$3:$B$14“(或”姓名“),设置”单元格链接“为$J$1,如图。
单击”确定“回到表格中,按ESC键或在任一单元格单击一下取消组合框的编辑状态。这样设置以后,我们在下拉列表中选择一个姓名后,在J1单元格中将出现该姓名在姓名列表中的相对位置。例如我们选择第3个姓名”王霞“,J1单元格中返回数值3。
4.在数据区C3:H14中用VLOOKUP函数对工资数据进行关联,利用工资表中的序号数字返回工资数据,方法同上。
方法三:用VBA控件工具箱中的组合框控件。
1.在菜单栏上右击,在弹出的菜单中选择”控件工具箱“,将弹出”控件工具箱“浮动工具栏,单击”组合框“控件。
2.将光标放到表格中,这时光标变成细黑十字形,在表格中画一个组合框。
3.右击组合框,在弹出的菜单中选择”属性“。
4.在”属性“窗口中,将ListFillRange属性设置为”‘1月工资’!B3:B14“。关闭”属性“窗口 。
5.按Alt+F11,打开VBA编辑器,在”个人工资表“中添加 下列代码:
Private Sub ComboBox1_Change()
Range(”c1“) = ComboBox1.Value
End Sub
6.在数据区C3:H14中用VLOOKUP函数对工资数据进行关联,途径同上。
另外,我们也可使用VBA代码将员工名单添加到组合框中,有两种途径供选择:
在VBA编辑器的”工程“窗口中,双击”ThisWorkBook“,在右侧的代码窗口中输入下列代码:
1.使用 AddItem途径添加项目:
Private Sub Workbook_Open()
Dim vName As Variant
Dim i As Integer
‘创建列表
vName = Array(”张梅“, ”黄中“, ”王霞“, ”应军军“, ”郑枭“, ”刘梅波“, ”李飞“, ”吴燕“)
’使用 AddItem途径For i = LBound(vName) To UBound(vName)
Sheet3.ComboBox1.AddItem vName(i)
Next i
End Sub
2.使用 List 属性添加项目:
Private Sub Workbook_Open()
Dim vName As Variant
Dim i As Integer
‘创建列表
vName = Array(”张梅“, ”黄中“, ”王霞“, ”应军军“, ”郑枭“, ”刘梅波“, ”李飞“, ”吴燕“)
’使用 List 属性
Sheet3.ComboBox1.List = WorksheetFunction.Transpose(vName)
End Sub
其中Sheet3是VBA编辑器”工程“窗口中与”个人工资表“名称对应的工作表,这里直接引用的是Sheet3,而不是工作表名称。这样,每次打开工作簿时,姓名列表会自发添加到组合框中。更多精彩文章请关注当下软件园资讯教程频道。
4562210L
展开查看全部 4 条讨论
相关问题

输入msiexec/unregister和msiexec/regserver之后怎么恢复

924 浏览 0 回答

扩展阅读

华为MatePad SE新品开启预售 一台平板搞定全家需求

评论 0

华为MatePad SE新品开启预售 一台平板搞定全家需求

HKC GS49UK 显示器评测:宽阔视野洞悉无尽视界

评论 5

HKC GS49UK 显示器评测:宽阔视野洞悉无尽视界

DIY从入门到放弃:PCIe 5.0固态硬盘先别买!

评论 18

DIY从入门到放弃:PCIe 5.0固态硬盘先别买!

【机圈周报】Redmi K70至尊版开始预热 一加 Ace3 Pro发布

评论 12

【机圈周报】Redmi K70至尊版开始预热 一加 Ace3 Pro发布

真XDR高画质 TCL T7K电视美图一览

评论 7

真XDR高画质 TCL T7K电视美图一览
热门问题

苹果怎么打开apk 苹果怎么打开apk

8550 浏览 6 回答

苹果怎么打开apk 苹果怎么打开apk

樱花漫画官方网站入口是什么?

2.1万 浏览 3 回答

樱花漫画官方网站入口是什么?

微信客户服务电话95188人工时间?

2.4万 浏览 3 回答

微信客户服务电话95188人工时间?

我的微信群被人举报了,肿么可以查到是谁举报的?

1.6万 浏览 8 回答

我的微信群被人举报了,肿么可以查到是谁举报的?

求推荐一款笔记本。工科研究生用,便于随身携带。平时做科研,处理数据,查阅文献。不玩网游和单机,至多玩棋牌游戏和影音。喜欢摄影,需要修图。附加:纠结要不要带数字键盘区。预算最多8000。尽量便宜些。

1.2万 浏览 2 回答

求推荐一款笔记本。工科研究生用,便于随身携带。平时做科研,处理数据,查阅文献。不玩网游和单机,至多玩棋牌游戏和影音。喜欢摄影,需要修图。附加:纠结要不要带数字键盘区。预算最多8000。尽量便宜些。

键盘按字母键没反应,我的是笔记本电脑,忽然就打不了字了,按字母键没

1.3万 浏览 5 回答

键盘按字母键没反应,我的是笔记本电脑,忽然就打不了字了,按字母键没

笔记本键盘打斜线怎么打出来的啊?

1.4万 浏览 5 回答

笔记本键盘打斜线怎么打出来的啊?

照片挺清楚的,为何一发到微信朋友圈就模糊不清的?

1.3万 浏览 7 回答

照片挺清楚的,为何一发到微信朋友圈就模糊不清的?

wps怎么设置文字行间距20磅,我找不到在哪里设置?

2.5万 浏览 6 回答

wps怎么设置文字行间距20磅,我找不到在哪里设置?

魔兽世界,打完地下城怎么从地下城里头退出来

5622 浏览 6 回答

魔兽世界,打完地下城怎么从地下城里头退出来
最新问答

华硕笔记本设置secure boot control为enable后不能开机是为什么?

8827 浏览 5 回答

华硕笔记本设置secure boot control为enable后不能开机是为什么?

暴风影音综合设置在哪里

722 浏览 6 回答

暴风影音综合设置在哪里

戴尔笔记本进入u盘开启快捷按哪个键?

1.2万 浏览 3 回答

戴尔笔记本进入u盘开启快捷按哪个键?

为何我的电脑只要一切换输入法就会导致当前的程序未响应?

481 浏览 8 回答

为何我的电脑只要一切换输入法就会导致当前的程序未响应?

WPS中怎么调整默认格式 样式修改

1943 浏览 3 回答

WPS中怎么调整默认格式 样式修改
举报
举报成功

经过核实后将会做出处理,感谢您为社区和谐做出贡献。

请选择删除原因
删除成功
确定推荐该回答?
推荐成功

更多频道

频道导航
辅助工具