office中excel设置下拉框多选

我参照了这篇文章

https://www.php.cn/topic/excel/444717.html

这篇文章整体写得不错，但是有些小瑕疵

问题1：在模块1中保存。 这里并没有说清楚

具体是：VBA编辑器中--插入---模块

然后复制以下代码

Public ReLoad As Boolean '开关listbox的change事件

 最终效果呈现如下

问题2：data还在显示中，如果是给用户使用，显然是不希望让用户看到data那个sheet的，所以需要在模块1中继续加入以下代码

Public ReLoad As Boolean '开关listbox的change事件
Sub 隐藏data表()
    Worksheets("data").Visible = 2
End Sub

问题3：现在已经达到效果了，但是居然能够手动输入，这显然达不到我们要的效果

        ①选中要复选的列（整列选中）

        ②数据，数据验证

        

         ③选择序列，来源中添加内容，保持和data中的数据一致