请和废柴的我谈恋爱:怎样把两个表（有相同的字段)怎样合并成一个表

来源：百度文库 编辑：九乡新闻网 时间：2024/05/08 15:29:19

怎样把两个表（有相同的字段)怎样合并成一个表？(Excel)

 

     思路：用CountIf()函数对表1进行判断，如果其值为0，则表示没以重复，再将表2中和表1不重复的数据复制到表1中，从而实现两表合一。

解题的方法：

Sub dd()

b = Sheets(2).[a1].CurrentRegion.Rows.Count + 1

‘判断表2的行数

For i = 3 To b

a = Sheets(1).[a1].CurrentRegion.Rows.Count + 1　

‘判断表1的行数

c = Sheets(2).[a1].CurrentRegion.Columns.Count　　

‘判断表2的列数

If Application.WorksheetFunction.CountIf(Sheets(1).[b1:b1000], Sheets(2).Cells(i, 2)) = 0 Then

Sheets(2).Range(Sheets(2).Cells(i, 1), Sheets(2).Cells(i, c)).Copy Sheets(1).Cells(a, 1)　

‘将表2中与表1不重复的数据复制到表1中

End If

Next

End Sub



    上一篇：删除字符串中某个字符的函数是什么？删除字符串中某个字符的函数是什么？(Excel)
下一篇：如何用vba实现删除最右边的字符(Excel)
怎样把两个表（有相同的字段)怎样合并成一个表 excel怎么把两个单元格的内容合并为一个 怎样把多个EXCEL表格合并成一个EXCEL表格 - 已解决 - 搜搜问问 怎样有一个 一个卫星天线怎样接两个电视 一个男人应该怎样拥有两个女人？ 怎样做一个有气质的女人 一个女孩可以有怎样的坚强 一个女孩可以有怎样的坚强....... 怎样创建一个有战斗力的团队 一个女孩可以有怎样的坚强 怎样做一个有魅力的男人? 怎样培养一个有灵性的孩子 怎样做一个有魅力的女人 怎样做一个有魅力的男人。 怎样做一个有魅力的男人 怎样把自己培养成为一个优秀的程序员 把多个Excel文件合并到一个Excel文件的多个工作表（Sheet）里2 把多个Excel文件合并到一个Excel文件的多个工作表（Sheet）里 exce一个单元格里的数怎样把它们去除空格和每个位数相加，最好有自定义函数 Excel中怎样合并文本 ACCESS--获取表和字段 怎样的两个人才适合过一辈子 怎样把文章写得有波澜