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

转角处的沉思

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

longwin

你这不是都设置好了吗？

转角处的沉思

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

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

WANT-T

1. Public Sub 向单元格添加列表(rng As Range, addlist As String)
   
2. 
   
3.     With rng.Validation
   
4. 
   
5.         .Delete
   
6. 
   
7.         If addlist = "" Then Exit Sub Else .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:=addlist
   
8. 
   
9.         .IgnoreBlank = True
   
10. 
    
11.         .InCellDropdown = True
    
12. 
    
13.         .InputTitle = ""
    
14. 
    
15.         .ErrorTitle = ""
    
16. 
    
17.         .InputMessage = ""
    
18. 
    
19.         .ErrorMessage = ""
    
20. 
    
21.         .IMEMode = xlIMEModeNoControl
    
22. 
    
23.         .ShowInput = True
    
24. 
    
25.         .ShowError = False
    
26. 
    
27.     End With
    
28. 
    
29. End Sub

复制代码

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

转角处的沉思

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

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

WANT-T

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

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

转角处的沉思

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

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

WANT-T

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

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