下拉菜单，使得Excel输入已经很方便了，让身边的同事羡慕不已。
如果兰色说下拉菜单还要打开才能选取，有点慢。你是不是要质问我：难道还有更快的方法？其实，还真有更快的输入方法，你只需要点即可输入。
这个小框框可以双击H1单元格随时关闭或打开。
这样炫酷的输入方法制作并不复杂，下面就跟兰色一起做吧（Wps表格需要安装VBA For WPS模块，百度有下载）制作步骤：1、开发工具 - 插入 - 点击并拖出“列表框”显示开发工具方法：文件 - 选项 - 自定义工具栏（。
excel2007在常规 - 显示开发工具） - 开发工具
2、选取列表框 -右键 - 属性 - 修改以下属性：BackColor可以改变列表框底色ListFillRange把单元格内容显示到列表框中(直接输入单元格地址J1:J6，如果显示字符在另一个表中，需要加工作表名称，如Sheet1!J1:J6)
3、开发工具 -Visual Basic- 在新界面中的工程窗口选取当前的工作表名 - 把下面的代码复制粘贴到右侧的空白窗口中下面代码是把列表框中的内容输入到选取的单元格中Private Sub ListBox1_Click。
ActiveCell = ListBox1.TextEnd Sub下面代码是实现双击H1单元格时显示/关闭列表框你可以自定义H1的位置Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)。
If Target.Address = "$H$1" ThenIf Me.ListBox1.Visible = True ThenMe.ListBox1.Visible = FalseElseMe.ListBox1.Visible = True
End IfEnd IfEnd Sub下面的代码是让列表框的顶部跟随选取的单元格位置变动Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Me.ListBox1.Top = ActiveCell.TopEnd Sub
4、文件 - 另存为 - 保存类型选“Excel 启用宏的作簿”(*.xlam），excel2003略过此步。
完工！注意：可以通过“设计模式“按钮编辑/启用该列表框。
兰色说：也许有同学会问可否根据选择列不同，自动在小框框中切换不同的待选项？如果......？虽然你想要的太多，但VBA都可以帮你实现兰色建议大家抽时间学学VBA，好玩又实用，让身边的Excel高手瞬间变成你的仰慕者。
下周日，平台的VBA入门班就要开课了，原价388元，团购价99元，限100名，想报名的可以点击下面链接咨询或报名（1个月在线培训学习，学习内容VBA基础学习+制作简易进销存）返回搜狐，查看更多责任编辑：。
亲爱的读者们，感谢您花时间阅读本文。如果您对本文有任何疑问或建议，请随时联系我。我非常乐意与您交流。
发表评论:
◎欢迎参与讨论，请在这里发表您的看法、交流您的观点。