1 实现单元格下拉框
来源需要用英文逗号分隔，这里输入限制为最大255字符，如果需要更多可选择单元格范围：
到这里就实现了下拉选择：
2 导入VBA脚本实现多选
按Alt+F11唤出VBA代码编辑器，选中你的sheet，复制代码然后保存，保存时选否，保存为.xlsm文件
代码如下：
Private Sub Worksheet_Change(ByVal Target As Range)'UpdatebyExtendoffice0510Dim I As IntegerDim xRgVal As RangeDim xStrNew As StringDim xStrOld As StringDim xFlag As BooleanDim xArrOn Error Resume NextSet xRgVal = Cells.SpecialCells(xlCellTypeAllValidation)If (Target.Count > 1) Or (xRgVal Is Nothing) Then Exit SubIf Intersect(Target, xRgVal) Is Nothing Then Exit SubApplication.EnableEvents = FalsexFlag = TruexStrNew = Target.ValueApplication.UndoxStrOld = Target.ValueIf xStrNew <> "" ThenIf InStr(1, xStrOld, xStrNew) = 0 ThenxStrNew = xStrNew & IIf(xStrOld <> "", "、" & xStrOld, "")ElsexStrNew = xStrOldEnd IfEnd IfTarget.Value = xStrNewApplication.EnableEvents = TrueEnd Sub
再看文件时已经可以多选了：
自定义分隔符号：
更改这个顿号为你想要的后保存脚本即可。
参考链接：/questions/content/wq9lhv
