如何在更短的时间内比较VB.Net中的两个excel?

时间:2018-02-07 12:00:40

标签: .net vb.net

我需要通过比较两个excel来生成一个报告,但由于每个excel有5000多行数据,因此需要花费更多时间。为了避免这些,我为excel中的每一列创建了列表(对于两个excel)并尝试生成报告。我仍然觉得我可以通过为每个excel创建一个列表来实现相同的目标。所以我的问题是" How to create only one list for one excel ( with 7 column values) and compare both the list (i.e. List1 of Excel1 and List2 of Excel2) and generate the report??。 由于我是VB新手,我不知道并且需要你的建议。 等待快速建议.. 以下是我的代码段:

 For list_one = 0 To xlsheet1_file_name.Count - 1

                    For list_two = 0 To xlsheet2_file_name.Count - 1
                        Dim g1 As Integer = i1
                        If IsNothing(xlworksheet2.Range("H" & g1).Value) Then
                            If (xlsheet1_file_name(list_one) = xlsheet2_file_name(list_two)) Then
                                System.Windows.Forms.Application.DoEvents()
                                If (source_code_1(list_one) = source_code_2(list_two)) Then
                                    If (M2CM_num_1(list_one) = M2CM_num_2(list_two)) Then
                                        If (msg_num_1(list_one) = msg_num_2(list_two)) Then
                                            Dim e1 As Integer = row_number_list_worksheet2(list_two)
                                            Console.WriteLine("the value of row =" & e1)
                                            xlworksheet2.Range("H" & e1).Value = action_1(list_one)
                                            xlworksheet2.Range("i" & e1).Value = comments_1(list_one)


                                        End If
                                    End If
                                End If
                            End If
                        End If
                        i1 += 1

                    Next

                Next

0 个答案:

没有答案