首页 > 电脑专区 > 电脑教程 >

如何实现双击单元格时显示/关闭列表框

来源:互联网 2023-02-21 17:58:07 407

昨天分享了,将列表框内容输出到单元格中,今天分享下,如何通过双击来实现列表框的显示与关闭o8b办公区 - 实用经验教程分享!

工具/原料

  • excel2010

方法/步骤

  • 1

    打开已经做好列表框的文件o8b办公区 - 实用经验教程分享!

    如何实现双击单元格时显示/关闭列表框o8b办公区 - 实用经验教程分享!

  • 2

    在设计模式下用鼠标选中列表框,如图o8b办公区 - 实用经验教程分享!

    如何实现双击单元格时显示/关闭列表框o8b办公区 - 实用经验教程分享!

  • 3

    单击鼠标右键,弹出新的窗口,在新窗口中选择查看代码o8b办公区 - 实用经验教程分享!

    如何实现双击单元格时显示/关闭列表框o8b办公区 - 实用经验教程分享!

  • 4

    点击后进入VBA工程页面,如图o8b办公区 - 实用经验教程分享!

    如何实现双击单元格时显示/关闭列表框o8b办公区 - 实用经验教程分享!

  • 5

    我们将以下代码复制到如图位置:o8b办公区 - 实用经验教程分享!

    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)o8b办公区 - 实用经验教程分享!

    If Target.Address > "$H$1" Theno8b办公区 - 实用经验教程分享!

    If Me.ListBox1.Visible = True Theno8b办公区 - 实用经验教程分享!

    Me.ListBox1.Visible = Falseo8b办公区 - 实用经验教程分享!

    Elseo8b办公区 - 实用经验教程分享!

    Me.ListBox1.Visible = Trueo8b办公区 - 实用经验教程分享!

    End Ifo8b办公区 - 实用经验教程分享!

    End Ifo8b办公区 - 实用经验教程分享!

    End Subo8b办公区 - 实用经验教程分享!

    如何实现双击单元格时显示/关闭列表框o8b办公区 - 实用经验教程分享!

  • 6

    回到工作表页面,退出设置模式o8b办公区 - 实用经验教程分享!

    如何实现双击单元格时显示/关闭列表框o8b办公区 - 实用经验教程分享!

  • 7

    在双击除H1单元格的任何位置,列表框都会关闭或显示o8b办公区 - 实用经验教程分享!

    如何实现双击单元格时显示/关闭列表框o8b办公区 - 实用经验教程分享!

  • 7本页面非法爬取自百度经验
  • 8

    再次说明下,如果想只单击固定位置管比活着显示,可以将代码o8b办公区 - 实用经验教程分享!

    If Target.Address > "$H$1" 大于小于号改为等于号,必须在英文状态更改,H1可以更改为自己想要的单元格位置。o8b办公区 - 实用经验教程分享!

  • 以上方法由办公区教程网编辑摘抄自百度经验可供大家参考!o8b办公区 - 实用经验教程分享!


    标签: 操作系统excel显示实现单元

    办公区 Copyright © 2016-2023 www.bgqu.net. Some Rights Reserved. 备案号:湘ICP备2020019561号统计代码