| 
    
     |  | ▼phoo さん: >いくつか質問させてください。
 >
 >1.Application.Windows("仕入先別VA******.xls").Activate ←ここでエラーがでます。
 >
 >本当にここで、エラーが発生しているのですか?
 >(私のほうでは、同じようなコードで実行した結果、うまくいきました。)
 
 はい。ここでエラーが出てしまいます。
 
 >2.文章とロジックが合っていないみたいですが・・・。
 >
 > 「原価低減データ.xls」 :Sheets("CK302.")
 > 「仕入先別VA******.xls」:Sheets("CK30")
 
 >で、合っていますか?
 
 本来のコードには
 「原価低減データ.xls」 のSheets("CK302.")は
 "CK30"と2を○で囲んだ番号が入っているのですが、
 このページに書き込むと何故か"302."と表示されて
 しまいます。
 だから、2つのシート名は異なります。
 
 IROCさんのおっしゃるようにマクロで記録して、
 「仕入先別VA200407.xls」の年月の部分を
 「仕入先別VA******.xls」というように
 *印に書き換えた場合でも、同じところでエラーが発生します。
 
 
 |  |