[已解决]VBA＿设置单元格数据有效性－新问题13

yjwdjfqb · 发表于 2011-8-13 20:44

VBA＿设置单元格数据有效性－新问题13

问题在附件中，请大家帮忙　。。。

最佳答案

月排行榜 / 总排行榜

兰色幻想

2011-8-14 19:02

数据有效性里设置的字符串好象不能超过255个，张67正好超过

跳转到最佳答案楼层

fjmxwrs · 发表于 2011-8-13 21:07

查看字典时是2011-1-1样子，到了序列中即是1/1/2011样子了，搞不明白什么意思，跟踪学习。

yjwdjfqb · 发表于 2011-8-13 21:13

回复 fjmxwrs 的帖子

就是呀，发了好久了，想找高手们解决下。。。

兰色幻想 · 发表于 2011-8-14 17:50

   If arr(i, 1) <> "" Then
      If IsDate(arr(i, 1)) Then
         d("'" & arr(i, 1)) = ""

      Else
         d(arr(i, 1)) = ""

      End If
      End If

yjwdjfqb · 发表于 2011-8-14 17:52

回复兰色幻想的帖子

兰老师，把这句加到那里呀

yjwdjfqb · 发表于 2011-8-14 17:53

回复兰色幻想的帖子

兰老师，修改好的上传个附件好吧

兰色幻想 · 发表于 2011-8-14 18:20

把红色的代码替换成上面的
For i = 1 To UBound(arr)
If arr(i, 1) <> "" Then d(arr(i, 1)) = ""
Next

yjwdjfqb · 发表于 2011-8-14 18:47

回复兰色幻想的帖子

兰老师，有点问题，如果选择姓名，对应单元格生成的数据有效性中，缺少数据，

如，输入　姓名　　下一个单元格中，选项中就没有　张67

请测试

兰色幻想 · 发表于 2011-8-14 19:02

数据有效性里设置的字符串好象不能超过255个，张67正好超过

yjwdjfqb · 发表于 2011-8-14 19:04

回复兰色幻想的帖子

唉，找了好久的原因。。。。。

兰老师，一句话惊醒梦中人呀。。。。

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