浅谈Excel查询

roych

      上次小妖姐姐在灌水帖里评了-30分，这次只好贴几个实例上来好混点评分，——请让小生自恋三秒钟，(*^__^*) 嘻嘻……）
      没想到，小妖姐姐一上来就刁难Roy。。。。
      小妖姐姐说的定位，是不是Move系列方法（MoveFirst、MoveLast等等）。不过由于记录集属于内存数据，没试过，不知道行不行。
      而查找功能，应该是记录集中的Find方法，大家可以试试。语法为：rst.Find (条件, 起始行, [搜索行方式],查找方式 )
例如，从第一行搜索Roy的数据可以这样写：rst.Find("姓名=Roy",1,,adSearchForward)，——第一行开始，肯定是向前搜索的了。
      不过，有这个必要么？  

• 定位功能。Roy觉得查询出来之后，根据记录的条数，再用offset方法来定位岂非简单多了？
• 查找功能。直接用系统自带的查找功能也不算太烂吧？即便想用VBA，也可以用For语句+Find方法来查找数据啊。是不是？
  

      狠狠地鄙视下小妖姐姐的无厘头难题~~~

aslxt

roych 发表于 2011-3-13 13:36
回复 aslxt 的帖子

改成有效性序列时，就相当于组合框了~~但是这个数据较多，可能做成二级下拉菜单要好些。 ...

简单改成有效性系列时，如何解决以下问题：
1、序列的唯一性
2、序列的排序
3、下拉高度（只有8行，找了很久都没有方法改变这个高度，也就是下拉后显示的行数）
有知道的请指教一下

roych

aslxt 发表于 2011-3-13 18:12
简单改成有效性系列时，如何解决以下问题：
1、序列的唯一性
2、序列的排序

问题1：分两种情况：
如果是固定的序列（如中国的省份等等），可以设置一个唯一的数列，定义好名称后在有效性里设置好就行了。
如果不是固定的序列，例如随时增加序列号的话，则需要写数组公式来列出不重复值，然后再动态定义该序列。有时间的话，我会写点这方面的实例。——个人觉得这倒不如用数据透视表做好之后，每次打开时刷新透视表，从而得到动态数据要好些。
问题2、顺序是必须排列好的。当然，你也可以在启用宏的情况下，每次打开时自动对序列进行排序（用Sort方法）。
问题3、Roy暂时没研究。

pureshadow

妖是V白！
查找和定位指的是CTRL+F和F5的两个功能，这对于V白们来说是个极好的查找手段，现实中让我去查找一堆东东，除非迫不得已坚决不用FIND，更不用那些让人头晕的数组函数。
顺便还有，筛选也是一种查找手段。
PS，让鄙视来得更猛烈些吧！！！！

roych

对于小妖姐姐，这一点我是赞同的。我对所有人都是这么说的，能用命令时决不用公式，能用公式时决不用数组，能用数组时决不用VBA。
不到万不得已，谁会那么有空去调试代码呢？而且，我写这个的初衷，也不是为了鼓励大家去学VBA，更不是为了炫耀我的菜鸟VBA水平，而是希望这个能作为一种工具，能够简化大家的工作。——当然，前提是你必须知道怎么改数据源（这要求应该不算太高吧？），否则也是“授人以鱼”。

polygala1978

回复 roych 的帖子

无比激动的感谢楼主，帮了大忙

pureshadow

roych 发表于 2011-3-14 11:21
对于小妖姐姐，这一点我是赞同的。我对所有人都是这么说的，能用命令时决不用公式，能用公式时决不用数组， ...

没有鄙视？盾牌白准备了

q3747

谢谢分享，学习学习

sukii

厉害啊

huanglucy

学习