以下の手順で、DAOを使用して、閉じたブックからレコードセットを取得し、データの読み取り/書き込みを行うことができます。

次のようなプロシージャを呼び出します:

GetWorksheetData “C:\ Foldername \ Filename.xls”、 “SELECT * FROM [SheetName $]”、ThisWorkbook.Worksheets(1).Range( “A3″)

SheetNameを、データを取得するワークシート名に置き換えます。

マクロの例は、VBAプロジェクトがDAOオブジェクトライブラリへの参照を追加したことを前提としています。

これを行うには、VBE内から、[ツール]、[参照]メニューを選択し、[Microsoft DAOx.xxオブジェクトライブラリ]を選択します。