Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


26541 / 76732 ←次へ | 前へ→

【55522】毎月動いていたVBが突然動かなくなりました。
質問  zaitsev  - 08/5/9(金) 14:52 -

引用なし
パスワード
   データ パラメータ
AA   1
AB   1
AC   2
AD   1
AE   3
AF   2
AG   2
AH   1
(以下続く)

というテーブルのEXCELファイル(仮に"A.xls"というファイルとします)があり、
このファイルにVBモジュールを保存しています。


毎月、データが羅列されているのファイル(こちらを"B.xls"とします)が別に出てくるので、
この"A.xls"のVBを立ち上げて、"B.xls"ファイル上に、

Dim MyThisFile As String
MyThisFile = ThisWorkbook.Name

Range("O1") = "=VLOOKUP(F1," & MyThisFile & "!$A$1:$B$1000,2,FALSE)"

という式を貼り付けて、"B.xls"のF列を参照して、O列にパラメータを引っ張ってくる、
という作業を毎月行っていました。
(この後、この式をデータの最終行までコピーしていました)

先月まではこれで問題なく動いていたのですが、今月突然、

”実行時エラー'1004'
アプリケーション定義またはオブジェクト定義のエラーです”

と出て動かなくなってしまいました。


○VLOOKUP でテーブルにしている "A.xls" の参照方法が、
 ファイル名だけで、シート名を取得していない

○"A.xls" というモジュールのファイルと、
 "B.xls"というデータファイルの両方を立ち上げてVBを走らせる、
 という方法に問題がある

等が考えられますが、
いずれにしても先月までは問題なく動いていたので、
突然動かなくなった理由が皆目検討がつきません。


どなたかご教示頂ければと思います。
よろしくお願いいたします。

2 hits

【55522】毎月動いていたVBが突然動かなくなりました。 zaitsev 08/5/9(金) 14:52 質問
【55524】Re:毎月動いていたVBが突然動かなくなりま... ひげくま 08/5/9(金) 15:56 発言
【55525】Re:毎月動いていたVBが突然動かなくなりま... zaitsev 08/5/9(金) 16:25 発言
【55526】Re:毎月動いていたVBが突然動かなくなりま... ひげくま 08/5/9(金) 16:44 発言
【55528】Re:毎月動いていたVBが突然動かなくなりま... zaitsev 08/5/9(金) 17:56 発言
【55529】Re:毎月動いていたVBが突然動かなくなりま... ひげくま 08/5/9(金) 19:04 発言
【55530】Re:毎月動いていたVBが突然動かなくなりま... zaitsev 08/5/9(金) 19:26 発言
【55532】Re:毎月動いていたVBが突然動かなくなりま... ひげくま 08/5/9(金) 19:42 発言
【55535】Re:毎月動いていたVBが突然動かなくなりま... zaitsev 08/5/9(金) 20:02 発言
【55536】Re:毎月動いていたVBが突然動かなくなりま... ひげくま 08/5/9(金) 20:11 発言
【55538】Re:毎月動いていたVBが突然動かなくなりま... zaitsev 08/5/9(金) 20:49 お礼
【55564】Re:毎月動いていたVBが突然動かなくなりま... VBWASURETA 08/5/11(日) 13:08 発言
【55580】Re:毎月動いていたVBが突然動かなくなりま... zaitsev 08/5/12(月) 9:43 お礼

26541 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free