質問: wshでエクセル」を検索表示 wshを使ってデータを入力、エクセルファイル内を検索して、該当データがある行のいくつかのセルの内容を表示する方法があればおしえてください。
回答: 再度回答します。 この記述だと毎回17000件のデータを検索しています。 見つかった時点でループを抜けるようにしましょう。 データは常に17000件入力されているのでしょうか? もし、そうでないならデータの最後尾まで検索するように書き直しましょう。 x=myexel.cells(i,25) if x=f then d=i のぶぶんは冗長ですので if myexel.cells(i,25)=f then exit for とかにするといいんじゃないでしょうか。xに変数を代入する処理が17000回分減りますから速度が向上するはずです。d=iもいらないんじゃないですか。iをそのまま使えばいいと思います。exit forでforループが抜けれたかどうかははっきりと記憶してませんので確かめてみて下さい。 もっと早くしようと思ったらエクセルの検索機能を利用するのがよいでしょう。マクロの記録でコードを調査してスクリプトに組み込んでみるとよいと思います。