AAA.xlsのデータを開いた状態で

Workbooks.Open Range("A1").Value & ".xls"
If Range("A2").Value > 0 Then Sheets("sheet1").PrintOut Copies:=Range("A2").Value


AAA.xlsを開き、そのA1に書かれてるBBB（という名の）.xlsをA2にある数分だけ印刷したいマクロを組みたいのですが、
上記のだとBBB.xlsのA2を参照しようとしてしまいます。
どうすればAAA.xlsファイルのA2を参照できるでしょうか？