Comments by garrox (Top 1 by date)

yeh, thats a very good idea of what i want
now i added the code to my workbook as macro and altered the last line thus:

CompareWorksheets ActiveWorkbook.Worksheets("Sheet1"), _
Workbooks(ActiveWorkbook.Path & "\File2.xls").Worksheets("Sheet1")

now i get the following error: Run-time error '9': Subscript out of range

i cant get it to work. File2.xls is in the same directory as the active workbook.