在excel表格中如何筛选编号相同的,也就是重号

在excel表格中如何筛选编号相同的,也就是重号,第1张

1.这里做一个例子,首先打开需要查找重复内容的表格。

2.这里查找H列是否有重复的内容:

1)从有内容的地方开始选中,直到最后一行,我这里是8748行,有内容的行是第六行,也就是h6到h8748。

2)点击:格式--->条件格式。(H6-H8748的状态还是被选中哦!)

在条件格式的窗口中选择条件为“公式”。

3.在公式输入框中输入:

=COUNTIF($h$6:$h$8748,$h2)>1

PS:如果你选择的是C列,内容是从第2列到1000列,那么可以根据上述公式改为:=COUNTIF(C$2:H$1000,$C2)>1。

4.然后在“条件公式”菜单中点击“格式“。

选择一个颜色,用来标识重复(相同)的内容。

选的是红色。

5.最后点击“确定”。

具体做法:

新建工程时选数据工程,此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件

然后在FORM1窗体中添加ADODC控件和DATAGRID控件,将DATAGRID1的属性DATASOURCE选ADODC1,打开ADODC1控件属性页使用连接字符串,选生成,在提供者选项中选MICROSOFT jet 4.0 OLE DB Provider,然后按要求连接数据库等。在ADODC1控件属性页使用连接字符串空白文本窗口中就有一长串字符串,注意该字符串可复制到程序代码用于编程。ADODC1控件属性页的数据源内有命令文本(SQL)编写窗口可编写SQL查询语言。该窗口的SQL语句可复制到程序代码用于编程。

SQL查询语言主要结构为:

Select 查询字段 from 表名 Where 查询条件语句 [排序语句或分组语句]

查询字段必须分别用(西文)逗号分开或就用一个*号代替,上述查询中排序语句建议最好应用。

SQL查询语言如有错程序运行时告诉你出错,作相应改动即可。本人一般先按上述连接,SQL用"SELECT * FROM TabelName"作调试,无问题,用一个按钮孔件将前述需复制的连接字符串和SQL查询语言先复制于按钮控件的CLICK事件中备着,以便放着以后使用。然后删去ADODC1孔件,再添加ADODC1控件再添其他内容。

代码如下,请按你实际要求修改,

Private Sub Form_Load()

Text1 = ""

With Adodc1

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0Data Source=E:\db1.mdbPersist Security Info=False"

Adodc1.RecordSource = "select name from b1 order by name"

Adodc1.Refresh

DataGrid1.Refresh

End With

End Sub

Private Sub Text1_Change()

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0Data Source=E:\db1.mdbPersist Security Info=False"

Adodc1.RecordSource = "select name from b1 where name >='" &Text1 &"' order by name"

Adodc1.Refresh'对查询更新

DataGrid1.Refresh

End Sub

补充代码如下,Tabel1是你需查询的数据表:

Private Sub Command1_Click()

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0Data Source=E:\db1.mdbPersist Security Info=False"

Adodc1.RecordSource = "select * from Tabel1 where 部门 ='" &"车间" &"'"

Adodc1.Refresh'对查询更新

DataGrid1.Refresh

End Sub


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/sjk/9729312.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-01
下一篇 2023-05-01

发表评论

登录后才能评论

评论列表(0条)

保存