| 
    
     |  | こんばんは、YU-TANG です。 
 > 下記の通り記載を直しました!
 >
 >   ChDir "K:\外貨入出金比較\BANK BOOK 照合"
 >   Workbooks.Open Filename:="K:\外貨入出金比較\BANK BOOK 照合\Book1.xls"
 >   Set xlApp = GetObject(, "Excel.Application.9")
 >
 > あらかじめファイルをver2000で作成しておきオープンというYU-TANG さんのご指摘方法で出来ました☆
 > ありがとうございました!!!!!
 
 解決したようで何よりです。
 
 ……が、一応 過去ログのために補足しておくと、そのやり方は
 自分の回答と関係ないですし、そのコードでバージョンを特定
 できるというのも不思議です。
 解決しているわけですからそれでいいのかもしれませんが、
 小僧さんの提案で Excel 2000 を regserver したから
 クラス名 Excel.Application が Excel 2000 に関連付けられて
 いるだけの可能性はありませんか(まあそれで問題ないなら、
 はなから Excel 2000 を既定のクラス ハンドラーにしておけば
 よかっただけの話ですが)。
 また、Access VBA のはずなのに、何の修飾も無く「Workbooks」が
 出現するのも非常に香ばしい感じです。幽霊にとりつかれなければ
 よいのですが。
 
 2007 に関連付けられている混在環境の方は、10974 のコードで
 本当に特定バージョンの Excel を開けるのでしょうか?
 時間と環境が許す方は、再現テスト結果などお寄せいただけると
 有効性が確認できると思います。
 
 それでは。
 
 |  |