首页 > 编程知识 正文

java实现两个表数据对比,java对比数据库两张表的数据

时间:2023-05-06 03:54:57 阅读:244772 作者:4466

目标:

搜索并比较两个字段E列(表2)到E列(表1)将表2中的重复值返回到表3

显示和突出显示工作表1和2上的重复值突出显示

从工作表2复制重复条目,然后添加到工作表3

如果E列(表2)= E列(表1),则从(表2)复制行并添加到表3

我试图比较工作簿中的两个excel表 . 我想在工作表2和1之间找到重复的值,并在两个工作表上突出显示这些值 . 我知道这是一个匹配或vlookup函数,但添加的图层是我想将这些值仅从第2页复制到第3页进行视觉比较 . 我试图创建一个宏,但这没有帮助,我正在尝试编辑它;

Sub rowContent()

Dim ws1 As Worksheet

Dim ws2 As Worksheet

Dim i As Long, j As Long

Dim isMatch As Boolean

Dim newSheetPos As Integer

Set ws1 = ActiveWorkbook.Sheets("Sheet1")

Set ws2 = ActiveWorkbook.Sheets("Sheet2")

'Initial position of first element in sheet2

newSheetPos = ws2.Cells(ws2.Rows.Count, 1).End(xlUp).Row

For i = 1 To ws1.Cells(ws1.Rows.Count, 1).End(xlUp).Row

isMatch = False

For j = 1 To ws1.Cells(ws1.Rows.Count, 2).End(xlUp).Row

If ws1.Cells(i, 1).Value = ws1.Cells(j, 2).Value Then

ws1.Cells(j, 2).EntireRow.Copy ws2.Cells(newSheetPos, 1)

isMatch = True

newSheetPos = newSheetPos + 1

End If

Next j

If isMatch = False Then newSheetPos = newSheetPos + 1

Next i

End Sub

为我的情况工作 . 任何帮助将不胜感激,因为我不是Excel大师 .

版权声明:该文观点仅代表作者本人。处理文章:请发送邮件至 三1五14八八95#扣扣.com 举报,一经查实,本站将立刻删除。