Hi all, I have two Workbooks in folder "C:\Documents". One is call
"Source.xlsm" and the other call "Data.xlsm". In Workbooks
("Source.xlsm").Sheets("Sheet1").Column("C").Range ("C2:C10") I have
formula "=A2&B2" down to "=A10&B10". And in Workbooks
("Data.xlsm").Sheets("Sheet1").Column("B").Range(" B2:B100") i have
data. I want macro in Workbooks("Source.xlsm") in Worksheet Module
which should work in Range("A2:B10"). I want that when Value in
cells A2 & B2 < "" then Macro should match cell C2 value in Workbooks
("Data.xlsm").Sheets("Sheet1").Column("B").Range(" B2:B100") and if
value match then do nothing but if value don't match then show MsgBox
with message "Value not Matched". Macro should do this when ever i
put value in cells of Range("A2:B10") as i mentioned above. Please can
any friend can help

I don't think you want to keep on opening and closing workbkooks. I think
you want to add a thrid column in workbook "Source.xlsm" add links to
workbook "Data.xlsm" data. then simply add a formula in the Source workbook
to perform your checks. Possibly conditional formating statements.

If you want a macro then menually run the macro to perform the checks. You
can have the macro highlight the cells that arre diffferent and even add the
diffferrentt value into a column in the source workbook.

"K" wrote:

Hi all, I have two Workbooks in folder "C:\Documents". One is call
"Source.xlsm" and the other call "Data.xlsm". In Workbooks
("Source.xlsm").Sheets("Sheet1").Column("C").Range ("C2:C10") I have
formula "=A2&B2" down to "=A10&B10". And in Workbooks
("Data.xlsm").Sheets("Sheet1").Column("B").Range(" B2:B100") i have
data. I want macro in Workbooks("Source.xlsm") in Worksheet Module
which should work in Range("A2:B10"). I want that when Value in
cells A2 & B2 < "" then Macro should match cell C2 value in Workbooks
("Data.xlsm").Sheets("Sheet1").Column("B").Range(" B2:B100") and if
value match then do nothing but if value don't match then show MsgBox
with message "Value not Matched". Macro should do this when ever i
put value in cells of Range("A2:B10") as i mentioned above. Please can
any friend can help