Thread
:
comparing rows of two workbooks
View Single Post
#
2
Posted to microsoft.public.excel.programming
Dave Peterson
external usenet poster
Posts: 35,218
comparing rows of two workbooks
Nope.
You could loop through each cell in the row.
Or you could concatenate the values in each cell in the row into one giant
string and compare that???
wrote:
I am trying to compare two workbooks with respect to rows. Is there a
way of grabbing a whole row ? I am thinking of outer loop grabbing a
row from one workbook and then inner loop for comparing it with the
rows of the other workbook. I have tried different objects like rows,
entire row, row difference etc but no success. Can I get some help
here?
My code is:
Sub CompareBooks()
Dim iRow As Long
Dim iCol As Long
Dim LastRow As Long
Dim LastCol As Long
Dim compareOne As String
Dim compareTwo As String
Dim compareOneSheet As String
Dim compareTwoSheet As String
compareOne = "first.csv"
compareTwo = "second.csv"
compareOneSheet = "firstSheet"
compareTwoSheet = "secondSheet"
Dim first As Range
Dim second As Range
For Each second In
Workbooks(compareTwo).Worksheets(compareTwoSheet). rows //or range
For Each first In
Workbooks(compareOne).Worksheets(compareOneSheet). rows
If second.Row = first.Row Then
Workbooks(compareOne).Worksheets(compareTwoSheet). Cells(rows, 8).Value
= "match found"
Workbooks(compareOne).Worksheets(compareTwoSheet). Cells(rows,
8).Interior.ColorIndex = 44
Exit For
End If
Next
Next
End Sub
Any help will be greatly appreciated,
Thanks.
--
Dave Peterson
Reply With Quote
Dave Peterson
View Public Profile
Find all posts by Dave Peterson