ExcelVBA の Set ステートメントを使用すると、変数にオブジェクトを代入する事が出来るようです。