Your code is errant in the declaration of row1, it should be Long and the Set row1= line should be removed.

What workbook is your code in?

Your verbiage says to first copy a value from an open workbook.... I don't see any attempt to do this.
The B21 you're using is on the same sheet as you are looking for it in the just opened workbook.