[分享]无拘无束的数据有效性

chenhuafu · 发表于 2006-4-22 22:13

支持，山菊花的首个精华。我看了20分钟才懂

yigepure · 发表于 2006-4-22 23:02

不错，集各家之所长，小公式整出大东西了。呵呵，希望再接再励

wangtx218 · 发表于 2006-4-28 15:40

无拘无束的数据有效性

x=IF(data>"",IF(MATCH(data,data,)=ROW(data)-2,LEN(data)*10^9+COUNTIF(data,"<"&data)*10^5+ROW(data)-2))

LEN(data)*10^9+COUNTIF(data,"<"&data)*10^5这段何用

1avpJfWS.rar (3.57 KB, 下载次数: 157)

[此贴子已经被作者于2006-4-28 15:41:09编辑过]

山菊花 · 发表于 2006-4-28 16:16

这段包含两个数字:

LEN(data)*10^9 单元格中文本的长度，*10^9，排序的时候，以这个数据为主要因素，即先按文本的长度进行排序。

COUNTIF(data,"<"&data)*10^5 每一个单元格的文本与所有文本比较，大小的比较，默认是按音序进行比较，*10^5，把这个比较的结果排在“长度”的后面。

总的说，它的作用是排序。

wangtx218 · 发表于 2006-4-28 18:01

谢谢山菊花!!!

gouweicao78 · 发表于 2006-4-29 14:53

山菊花前辈的好东西，呵呵，收录！刚看了一个问题，于是在这边小小补充：

跨工作表、跨工作簿的数据有效性〉序列下拉菜单：

1、现象：为了方便，改手工输入为选择下拉菜单，大家经常会在一些表格空的地方输入常用的东西并以此作数据有效性，然后把引用区域隐藏起来。然而，有些东西不仅仅是本工作表要用到，一开始像一样那样想在sheet2的数据有效性引用sheet1的区域时，怎么也点不了sheet1的工作表标签，手动输入=sheet1!$A$1:$A$10，点确定——跳出“在数据有效性条件中不能使用对其他工作簿或工作表的引用”的警告。

难道我们还得在本工作表开辟个区域来做这个数据有效性吗——不甘心！于是聪明的人们发现了一点：定义名称！

2、解决：

1、在同一个文件（工作簿，假设为Book1）的跨工作表数据有效性引用:插入〉名称〉定义一个名称X=sheet1！$A$1:$A$10

则在这个Book1里的工作表之中都可以用=X来作数据有效性了。

2、假如我们在Book2想拿Book1的sheet1!$A$1:$A$10来做数据有效性怎么办呢？同样是采用定义名称解决。

错误：定义名称Y，在引用位置点击打开的Book1的sheet1!$A$1:$A$10，确定。然后在数据有效性输入=Y——出错了！

正确：定义名称Y，在引用位置点击打开的Book1的sheet1的任何一个单元格（假设为A1），此时引用位置的文字为：=[Book1.xls]Sheet1!$A$1 接下来把$A$1去掉，换成刚才我们定义的名称X——即=[Book1.xls]Sheet1!X 确定

于是Y的名称自动变为=Book1.xls!X。此时我们在Book2就可以一样引用Book1的东西来做有效性了。

不过——把Book1关闭后，这个有效性就失效了。

[此贴子已经被作者于2006-4-29 14:54:41编辑过]

andysky · 发表于 2006-4-29 20:03

其实这个东东实用性不大，太耗资源了。

zm6487 · 发表于 2006-4-30 10:44

学习中

zz5151353 · 发表于 2006-4-30 11:22

好東西,收藏了,多謝山菊花兄 !!! [em23][em23][em23][em24][em24][em24][em27][em27][em27]

也曾經看過您的解答,非但解釋的很好且非常詳細跟深入,想必您研究函數跟VBA非常透徹,不但VBA跟函數都一級棒真是羨慕加佩服呀 [em02][em04]

wanyan · 发表于 2006-6-7 10:11

请问一下，数据有效性中序列—〉来源—〉中怎么选定别的工作簿中的数据啊？

就像在第2个附件中，如何把“地址”选为“地址库”中的“整理地址簿”啊？

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