Excel VBA質問箱 IV

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

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


22480 / 76738 ←次へ | 前へ→

【59638】Re:文字の照合について
発言  ponpon  - 08/12/27(土) 17:56 -

引用なし
パスワード
   ▼いず さん:
こんにちは

>ユーザーフォームのテキストBOX1に記入した文字を含むセルを
>フォルダ内のEXCELファイルより探しだし、テキストBOX2の文字を
>探しだしたセル内の文章に追加する(追加場所は任意に指定したい。文の前後や何文字目かしていする。)ソフトを作成したいと思っています。
>
>フォルダ内から指定の文字を含むセルの探し方、また指定した文章の追加の仕方がわからずにいきずまっております。
>どなたか教えて頂けないでしょうか。

時間がない(大掃除で)ので、考え方だけ

(1)DirやFSOなどでDO LOOPを使ってフォルダ内のエクセルファイルを一つずつ開く

(2)開いたファイルの各シートをユーザーフォームのTEXTBOX1の文字で一つずつ検索する 
Findが使えそう  "*検索文字*"

(3)一致した場合は、そのセルを任意の場所で分割し、TEXTBOX2の文字を挟み、
 LOOPから抜ける miD関数、Rigit関数、LEFT関数、LEN関数が使えそう

(4)一致しない場合は、次のファイルを開き(3)の操作

こんな感じでできると思います。それぞれ過去ログの中にあると思うので
探してみてください。
0 hits

【59637】文字の照合について いず 08/12/27(土) 15:49 質問
【59638】Re:文字の照合について ponpon 08/12/27(土) 17:56 発言
【59685】Re:文字の照合について [名前なし] 09/1/1(木) 10:52 お礼

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