如何在ACCESS表中的一个FIELD里删除不符合条件的行

wing33709

求教！ 我要在ACCESS表中的Account_name中用VBA删除重复次数少于三次的Account_name, 如下表的例子：

Account_name	Size
Thinkpad	14'
Thinkpad	13'
Thinkpad	15'
Thinkpad	12'
HP	17'
HP	14'
DELL	14'
DELL	12'
Acer	12'

删选后的表格应该是这样：

Account_name	Size
Thinkpad	14'
Thinkpad	13'
Thinkpad	15'
Thinkpad	12'

可以使用 Docmd.RunSQL ”DELECT tablename.* FROM tablename WHERE Count(tablename.Account_name)<3"  之类的语言吗？ （这条语言是行不通的）， 请教高手！！！

---

marco

Docmd.RunSQL ”DELECT a.* FROM tablename a WHERE exixts((select count(1) from  tablename where Account_name=a.Account_name)<3)"

zhangjimfu

marco 发表于 2011-8-30 10:33
Docmd.RunSQL ”DELECT a.* FROM tablename a WHERE exixts((select count(1) from  tablename where Accou ...

学习marco的方法

roych

建议2L先把这部分语句在Access里运行一次再贴上来，以免误人子弟。

marco

下面这个也未经测试，方法原理比较简单，就是找出小于3条的记录再删除，分成两段来看就成：
Docmd.RunSQL ”DELECT * from (select a.* FROM tablename a WHERE exixts((select count(1) from  tablename where Account_name=a.Account_name)<3))"

wing33709

感谢大家回帖，但是marco的方法不可用。DELECT * from 后面需要直接跟expression，否则会报错。期待大家的帮助

roych

Exits是SQL Server（或MySQL等数据库）的谓词，不可用于Access，Access只支持Not In。因此可能需要定义一个自定义字段再处理。建议LZ贴个附件上来，晚上我再看看。

wing33709

roych 发表于 2011-8-31 09:21
Exits是SQL Server（或MySQL等数据库）的谓词，不可用于Access，Access只支持Not In。因此可能需要定义一个 ...

谢谢！ 附件内容跟我给的例子是一样的，只是数据量较大而已。如果可以，麻烦先用例子。实在需要附件的话，我可以上班的时候传一份拷贝上来，我这是美国东部时间，所以最快要国内的晚上九点才行。

zhangjimfu

wing33709 发表于 2011-8-31 12:20
谢谢！ 附件内容跟我给的例子是一样的，只是数据量较大而已。如果可以，麻烦先用例子。实在需要附件的话， ...

1. Delete * From tblTwo Where Account_name in (Select Account_name From tblTwo Group by Account_name having Count(*)<3)

复制代码

SQL语句供参考

删除不符合条件的行_zhangjimfu.rar (13.08 KB, 下载次数: 11)

2011-8-31 12:58 上传

点击文件名下载附件

marco

下面三个在ACCESS查数据都OK，自己把 delete 加上就行！我用的版本是2007，如果在03版中不支持 exists 可以反馈一下。
一、
select a.* FROM tablename a WHERE exists(select count(1) from tablename where Account_name=a.Account_name having count(1)<3)
二、
select a.* FROM tablename a WHERE (select count(1) from tablename where Account_name=a.Account_name)<3
三、
select a.* FROM tablename a WHERE a.Account_name in (select Account_name from tablename group by Account_name having count(1)<3)