Excel VBA質問箱 IV

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

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


34738 / 76734 ←次へ | 前へ→

【47202】数式ではなく値MATCHさせたい
質問  わさび  - 07/3/5(月) 13:09 -

引用なし
パスワード
   いつもお世話になっております。
今回、集計表の仕様変更に伴い、従来のコードに支障が出てしまいました。
どうかお力をお貸しください。


他のブックのTOTALというシートのA列に、元のブックのセルK1と同じ値があるかどうか調べ、
もしあれば、その値のある行に対して諸々の処理をしようとしています。
この「他のブック」というものがワークシート関数だらけでとても重く、
しかもそれを多いときには100以上ものブックを順次調べなければなりません。
そこでブックを開かないですむよう、
以下のようなコードで同じ値がある行番号を調べて処理していました。
今まではこのA列に値そのものが入っていたので、このコードで処理できていましたが、
仕様変更に伴い、A列には数式が入るようになってしまい、MATCHしなくなってしまいました…

With .Cells(i, 3)
  .Formula = "=MATCH(K1,'×××\[○○○.xls]TOTAL'!A:A,0)"
  .Value = .Value
End Wit

これを、数式ではなくその値でMATCHさせたいのですが、
どうしたらよいのかアイディアが浮かびません。
MATCH関数は範囲だけでなく、配列に対しても行なえるようですが、
私のスキルでは、ブックを開かずに配列に取り込むことができずに断念。

なお、A列の最終行は変動し、該当する値が入っていない場合もあります。


MATCH関数にこだわることはなく、他の方法も調べてみたのですが、
好ましい情報になかなか当たりません。
何か道標になるようなことがありましたら、どうかお与え下さい。
宜しくお願い致します。

*Windows2000, Excel2000

0 hits

【47202】数式ではなく値MATCHさせたい わさび 07/3/5(月) 13:09 質問
【47209】Re:数式ではなく値MATCHさせたい Jaka 07/3/5(月) 14:40 発言
【47211】数式ではなく値でMATCHさせたい わさび 07/3/5(月) 14:50 質問
【47221】Re:数式ではなく値でMATCHさせたい Jaka 07/3/5(月) 16:00 発言
【47224】Re:数式ではなく値でMATCHさせたい わさび 07/3/5(月) 16:47 質問
【47239】Re:数式ではなく値でMATCHさせたい ichinose 07/3/5(月) 23:07 発言
【47240】Re:数式ではなく値でMATCHさせたい わさび 07/3/6(火) 9:21 お礼
【47225】Re:数式ではなく値MATCHさせたい Kein 07/3/5(月) 16:49 発言
【47231】Re:数式ではなく値MATCHさせたい わさび 07/3/5(月) 18:05 お礼
【47235】Re:数式ではなく値MATCHさせたい Kein 07/3/5(月) 18:47 発言
【47241】Re:数式ではなく値でMATCHさせたい わさび 07/3/6(火) 9:28 お礼
【47244】おまけ Jaka 07/3/6(火) 10:20 発言
【47245】Re:おまけ わさび 07/3/6(火) 10:23 お礼

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