ブックをアクティブにするコードを変数で指定するには?

Question 68.4   Previous Next
詳細は こちら 500連発(第1弾)055番の「ブックをアクティブにする」について質問します。
本には、ブック名を変数で指定することも可能です。と、ありますが、どうすると良いのでしょうか。
Dim bookname1 As String
    bookname1 = "報告書.xls"
    Workbooks("bookname1").Activate
※この「報告書.xls」は本マクロを記録しているブックそのものです。 以上、お手数ですが、ご回答よろしくお願い致します。
Answer   Copyright (C) 2004.7.7 永井善王
500連発をご愛読ありがとうございます。
ほぼ出来ていますね。
3行目のダブルクォーテーションマークを消すだけでよいと思います。下記のとおり修正してから試してみてください。
    Workbooks(bookname1).Activate
カッコの中の文字を、ダブルクォーテーションマークで囲むと囲まれた文字がそのまま使われ、囲まないと変数名とみなされます。

参考ページ
変数で範囲指定して選択するには?

Excel VBA Macro