E学就会|这才是Excel中最牛的输入方法！，比下拉菜单快3倍下拉菜单

下拉菜单，使得Excel输入已经很方便了，让身边的同事羡慕不已。

文章图片
如果说下拉菜单还要打开才能选取，有点慢。你是不是要质问我：难道还有更快的方法？
其实，还真有更快的输入方法，你只需要点即可输入。

文章图片
这个小框框可以双击H1单元格随时关闭或打开。

文章图片
这样炫酷的输入方法制作并不复杂，下面就跟我一起做吧。（Wps表格需要安装VBAForWPS模块，百度有下载）
制作步骤：
1、开发工具-插入-点击并拖出“列表框” 。显示开发工具方法：文件-选项-自定义工具栏（excel2007以上版本在常规-显示开发工具）-开发工具

文章图片
2、选取列表框-右键-属性-修改以下属性：
BackColor可以改变列表框底色
ListFillRange把单元格内容显示到列表框中(直接输入单元格地址J1:J6 ，如果显示字符在另一个表中，需要加工作表名称，如Sheet1!J1:J6)

文章图片
3、开发工具-VisualBasic-在新界面中的工程窗口选取当前的工作表名-把下面的代码复制粘贴到右侧的空白窗口中

文章图片
【E学就会|这才是Excel中最牛的输入方法！，比下拉菜单快3倍】'下面代码是把列表框中的内容输入到选取的单元格中
PrivateSubListBox1_Click()
ActiveCell=ListBox1.Text
'下面代码是实现双击H1单元格时显示/关闭列表框。你可以自定义H1的位置。
PrivateSubWorksheet_BeforeDoubleClick(ByValTargetAsRange,CancelAsBoolean)
IfTarget.Address="$H$1"Then
IfMe.ListBox1.Visible=TrueThen
Me.ListBox1.Visible=False
Else
Me.ListBox1.Visible=True
'下面的代码是让列表框的顶部跟随选取的单元格位置变动
PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)
Me.ListBox1.Top=ActiveCell.Top

文章图片
4、文件-另存为-保存类型选“Excel启用宏的作簿”(*.xlsm）， excel2003略过此步。

文章图片
完工！
注意：可以通过“设计模式“按钮编辑/启用该列表框。

文章图片
编后语：也许有人会问可否根据选择列不同，自动在小框框中切换不同的待选项？如果......？虽然你想要的太多，但VBA都可以帮你实现。建议大家抽时间学学VBA ，好玩又实用，让身边的Excel高手瞬间变成你的仰慕者。
如果你是新朋友，关注，就可以每天和我一起学Excel了。

E学就会|这才是Excel中最牛的输入方法！，比下拉菜单快3倍

推荐阅读

电烤箱的危害

长期吃素对身体好吗

贵族|金与玉：公元14-17世纪中国贵族首饰(1)

迎接消费报复性反弹餐饮行业准备好接单和招商热线了吗？

宠物|新品｜一款含溶菌酶的零食布丁

熬小米粥

种烦恼|为什么得道高僧盘的都是手持，而不是手串？

肖战|2020年数字专辑销售榜公布，肖战断层第一，同样神迹恐难再现

健养小王医师|给身体来个大扫除，色斑不见了，皮肤白嫩嫩！，海带和此物一起煮

晨财经|只能想办法拿回公章，前叱咤风云创始人李的当当党人

华为最新发声：面对美国做好两件事！未来华为要逐步由专家来当家

[赵丽蓉]1999年深夜，赵丽蓉痛不欲生恳求安乐死，临终前说出了最遗憾的事！

症状|已有214人恢复健康正常上课，西北民族大学通报265名学生不适

脑梗发病前症状有哪些

中海地产实现业绩复苏，2020年不断推出新举措

青岛市|郑州汇泉西悦城问题频出：屋顶坍塌路面塌陷如何让业主安心？

桃胶保质期一般可以放多久

科技生活迷|科普知识大揭秘:为什么说核武器有毁灭全人类的危险？

手机之家网帮你更科学健康地喂猫小顽智能宠物喂食器体验

装修材料商场装修的注意事项有哪些商场地址的选择的注意事项有哪些