单元格区域设置数据有效性

转角处的沉思 · 发表于 2024-7-30 13:44

本帖最后由转角处的沉思于 2024-7-31 13:58 编辑

请教对部分单元格区域设置数据有效性，如图效果。

longwin · 发表于 2024-7-30 14:21

你这不是都设置好了吗？

转角处的沉思 · 发表于 2024-7-30 14:40

longwin 发表于 2024-7-30 14:21
你这不是都设置好了吗？

要用代码来实现，之前你帮忙解答的另一个帖子我尝试改动无果，那个帖子好像稍微改动下也能实现。

WANT-T · 发表于 2024-7-30 14:48

Public Sub 向单元格添加列表(rng As Range, addlist As String)
With rng.Validation
.Delete
If addlist = "" Then Exit Sub Else .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:=addlist
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.IMEMode = xlIMEModeNoControl
.ShowInput = True
.ShowError = False
End With
End Sub

复制代码

第一个参数，单元格区域，第二个参数，传入的列表，string类型，英文逗号分隔符，如"123,234,456,789"

转角处的沉思 · 发表于 2024-7-30 15:39

WANT-T 发表于 2024-7-30 14:48
第一个参数，单元格区域，第二个参数，传入的列表，string类型，英文逗号分隔符，如"123,234,456,789"

第一个参数是这样设置吗，第二个参数不知需如何设置。

WANT-T · 发表于 2024-7-30 19:37

转角处的沉思发表于 2024-7-30 15:39
第一个参数是这样设置吗，第二个参数不知需如何设置。

第一个参数,传递的是单元格区域对象

转角处的沉思 · 发表于 2024-7-31 07:59

WANT-T 发表于 2024-7-30 19:37
第一个参数,传递的是单元格区域对象

感谢答疑，这个区域是整个工作表单元格区域吗，可以限制在预设的小范围区域吗

WANT-T · 发表于 2024-7-31 14:58

转角处的沉思发表于 2024-7-31 07:59
感谢答疑，这个区域是整个工作表单元格区域吗，可以限制在预设的小范围区域吗

单元格区域自己指定就可以了

		自动登录	找回密码
密码			免费注册

[已解决] 单元格区域设置数据有效性