Question

我有2张Excel表格（使用Excel 2007）

Excel sheet1，列名为

name  
kumar 
manu  
kiran  
anu

Excel sheet2，列名为

name 
kumar   
anu

我将上传工作表，然后点击一个按钮（这里我将比较每个工作表中的名称列）然后我需要将工作表2中缺少的名称添加到另一个Excel工作表并保存到D：\ names。 XLSX

所以names.xlsx表应该包含

names
manu  
kiran

希望我的问题很明确，任何帮助都会很棒yaar

Answer 1

最简单的方法是：

将excel文件读入C＃
使用数据表的合并功能合并列
将数据写回excel文件。

Answer 2

您可以使用ADO。

Dim cn As Object
Dim rs As Object
Dim strFile As String
Dim strCon As String
Dim strSQL As String
Dim s As String
Dim i As Integer, j As Integer

''This is not the best way to refer to the workbook
''you want, but it is very convenient for notes
''It is probably best to use the name of the workbook.

strFile = ActiveWorkbook.FullName

''Note that if HDR=No, F1,F2 etc are used for column names,
''if HDR=Yes, the names in the first row of the range
''can be used. 
''This is the Jet 4 connection string, you can get more
''here : http://www.connectionstrings.com/excel

strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strFile _
    & ";Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"";"

''Late binding, so no reference is needed

Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")


cn.Open strCon

strSQL = "SELECT [Name] " _
       & "FROM [Sheet1$] a " _
       & "LEFT JOIN [Sheet2$] b " _
       & "ON a.[Name]=b.[Name] " _
       & "WHERE b.Name Is Null"

rs.Open strSQL, cn, 3, 3


''Pick a suitable empty worksheet for the results

Worksheets("Sheet3").Cells(2, 1).CopyFromRecordset rs

''Tidy up
rs.Close
Set rs=Nothing
cn.Close
Set cn=Nothing

如何比较2个Excel工作表列值

2 个答案: