• 締切済み

TextStream内の特定単語数を数えるには

宜しくお願いします。 縦方向に展開されているテキスト（データ）をExcel上でまとめようとしています。 FSOで取得したテキストデータを　.ReadAll で全て１つの変数に入れて InStr(buf, "住所") として、そのテキスト内に出てきた「住所」の数を数えようとしています。 しかし数えたい数が「１」としか出て来ません。 自分なりに調べてはいるのですが解決策が見当たらず悩んでいます。 具体的なソースでなくとも、参考URLでも結構ですのでお教え頂ければ幸いです。 --TextData.txt　（下記のセットが繰り返される）-- 住所：　東京 郵便：　100-2000 コメント：　文章ｘｘｘｘｘｘ ｘｘｘｘｘ メールアドレス：　username@example.com ---- --まとめたいExcelの形--- ---｜A---｜-B--　　　｜-C--　　　　　　　　｜-D-- -1-｜住所｜郵便　　　｜コメント　　　　　　　｜メールアドレス　　　　　　｜ -2-｜東京｜100-2000｜文章ｘｘｘｘｘｘ　ｘｘｘｘｘ｜username@example.com｜ -3-｜大阪｜540-3000｜文章ｘｘｘｘｘｘ　ｘｘｘｘｘ｜username2@example.com｜ ---------

みんなの回答

noname#212058
noname#212058
回答No.1

一番簡単なのは、Split関数を使って "住所" を区切り 文字にして文字列を分割してしまうことです。 Split 関数から返される配列の数から、1を引いたのが "住所" の個数になるでしょう。 Split関数(EXCEL) http://officetanaka.net/excel/vba/tips/tips62.htm Split関数(VBScript) http://msdn.microsoft.com/ja-jp/library/cc410311.aspx ところで、質問のデータの形式から気になる点があるのですが、 コメントに "住所" という文字列は存在しないのでしょうか？ 例えば『○月○日に住所が変わりました』とか。 もし、そのような文言があった場合、単純にデータの境目を "住所" という文字にすると、おかしな動きになりますよね？ ※この手の質問は対象言語を質問タイトルに入れて 　おいたほうが、回答が付きやすいですよ。 　EXCEL VBA とか VBScript とか。

kaidnu
質問者

補足

ご回答頂き有難うございます。返信遅くなり失礼しました。 まだ試しておりませんが、ご提言のやり方で１度やってみたいと思います。 >コメントに "住所" という文字列は存在しないのでしょうか？ 存在しない、という性善説の考え方です。実際のテキストデータには見当たらないから、というのが理由でもあります。確かに例外処理を入れるべきとは考えますが、そこまで手が回らないというのも理由にあります。 >※この手の質問は対象言語を質問タイトルに入れて ご助言ありがとうございます。仰る通りですね。 愚痴になりますが投稿時の件名の文字数制限をもうちょっと緩和して欲しいものです＾＾；

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. その他（プログラミング・開発）

関連するQ&A

  • 文章中の一つの単語の数を調べるには

    ある一つの単語が文章中にどれだけの数あるのかを調べるのにはどのようにすればよいのでしょうか。 出来ればワードかエクセルで探せるのであればありがたいのですが。 文章はテキストデータであります。

  • 英単語の出現数を数える方法

    Window上でターゲット文章の全ての英単語の出現数をカウントする方法を教えてください。ターゲット文章はexcel内の文字列でが、テキスト形式やword形式でのもかまいません。 フリーのツールをあればうれしいのですが。自作するほどスキルはないので。

  • 英訳をお願いします。

    郵便が届き、会社の住所は合っているんですが、Att:xxxxx と人名が書いてあります。xxxxxxの人がどの部署にいる人か不明の為、メールで皆さんに確認したいのですがどう英訳したらよいか教えて下さい。 ▪️内容 郵便局からxxxxxxxさん宛てに荷物が届いているのですが、どなたかこの方がどの部署に所属しているか知っている方がいれば ⚪️⚪️⚪️⚪️までお知らせ下さい。

  • excel（２００７）でリンク先のwebへ

    excel（２００７）でリンク先のwebを開く状態へ ダウンロードソフト（Irvine等)で、取得したアドレスをエクセルで管理して（余分な部分・・・例えば http://www.ｘｘｘｘｘ.com/st/st.php? id=71922&script=1&url= http://ｘｘｘｘｘｘ.com/abcdefgh/3683390 ＆P=70) の様なアドレスの中から必要な部分を関数（ＭＩＤ）等で抽出して別のシートへコピーします そのアドレスを1つ1つ選択していくとアンダーライン＆ブルーになってリンク先へ1クリック…状態になるのですが…。 取得したアドレスが１００とかそれ以上ある場合は≪アドレスを1つ1つ選択≫するのが非常に煩雑になります そこでアンダーライン＆ブルーになったリンクが含まれるセルの書式をペーストして見たところ…見た目はリンクになっているのですがポインターを持っていっても指印になりません もちろんオートコレクトのオプション設定は初期状態（http://www.ｘｘｘｘｘ.com/）と入力していくとリンクと認識される状態です １００以上のアドレスをワークシート上で一気に（ワンクリックで…１つづつ）ＨＰを参照できる状態にしたいのですが？ 教えてください

  • 郵便番号ウィザードがおかしくなったのですが。

    おかしくなったと言ってもある一つの住所だけなのです。住所から郵便番号を出現させる事をしていたのですが、誤って住所を入れる場所にも郵便番号を入れる場所も同じ住所のデータ（当然同じセル番号）を入れてしまいました。そして、間違いに気付かずに完了を押したところ 『郵便番号ウィザード：この住所から郵便番号への変換は、できませんでした。』 この様にコメントが表示されて郵便番号に変換出来ません。Excelを新規に作成しても同じです。全く同じコメントが表示され出来ない状態です。如何すればこの住所から郵便番号を導き出せるのでしょうか。 １． PCを再起動させる ２． アドインで一度郵便番号ウィザードを削除する ３． Excelの修復をする ４． Excelを再度入れ直す 自分が思い付くのはこれ位です。４は最悪の場合です。出来れば避けたいところなのですが、判ります方教えて下さい。宜しくお願い致します。

  • 郵便振込み

    以下の場合 郵便局にある 青色の振込み用紙？に記入してATMの機械に通して入金すればいいですか？ 下記郵便口座にお振込。 口座番号 xxxxx-x-xxxxxx 加入者名 xxx 振込金額 xxxx円 通信欄 入会金とご記入ください。 ご依頼人 お名前・ご住所・お電話番号をご記入 ください。

  • postfix「送信／受信？？」エラー

    いつもお世話になります。 早速ですが、首記の件で質問させていただきます。 メールログで下記を確認しました。 xxxxxxxxxxxx postfix/smtpd[6403]: NOQUEUE: reject: RCPT from localhost.localdomain[127.0.0.1]: 550 5.1.1 <xxxxi@example.com>: Recipient address rejected: User unknown in local recipient table; from=<xxxxx@localdomain.com> to=<*******@example.com> proto=ESMTP helo=<localhost> 因みにですが、いまのところ「example.com」以外の外部メールサーバに対して送信ができています。 お手数ですが、よろしくお願いいたします。

  • PHP内 メールアドレス　暗号化　必要性あり？スパム対策

    こんにちは、 PHPファイル内に記述しているメールアドレスは、HTMLファイルに記述しているメールアドレスのようにメールアドレスを自動回収するクラウラーに回収されてしまうのでしょうか？ もしそうであれば、PHPファイル内で下記のように変数として使用するメールアドレスを暗号化したいのですが、 ＞コード ＄mail = "example@example.com" 「example@example.com」を暗号化したいです。 ＞end　コード ＄mailは、「mail」関数や「send_mail」関数等に格納してメール送信に使用しするので、今回の場合、メールアドレス（example@example.com）がブラウザーに出力される必要はありません。 PHPファイル内のメールアドレスを暗号化する場合、通常のHTMLを16進数に変更するソフトで暗号化（16進数化）すれば良いのでしょうか？ ちなみに、HTMLメールアドレスを16進数に変更するソフトは、「HTMLエンティティ生成」を現在使用しています。 URL:http://ab.jpn.ph/soft/html_rand.html もしもHTMLを16進数に変更するソフトでのphpファイル内のメールアドレスの暗号化が不可能な場合、PHP内に記述されたメールアドレス（又はPHPコードを）暗号化するソフトや方法などをご紹介下さい。 よろしくお願いします。 キャサリン

    • ベストアンサー
    • PHP
  • パソコンに詳しい人教えてください エクセル（Exsel）の機能というか、ATOKの機能というか質問です。

    パソコンに詳しい人教えてください エクセル（Exsel）の機能というか、ATOKの機能というか質問です。 郵便番号を打ち変換を押すと住所が出てきますが これの逆はないのでしょうか？ 住所を入れて郵便番号を変換したいのです。 今エクセル（Exsel）で名簿作りをしていて 郵便番号と住所を打っています。 住所はわかるのですが、郵便番号がわからないことが多いのです インターネットで調べることが出来るのは知っているのですが、 数が多すぎるのでネットで調べると大変なのです エクセル（Exsel）で打っているときに そのまま住所→郵便番号がでてきたら便利だし早いと思うのです こんな機能があれば教えてください なんかソフトを入れるのでもいいです 教えてください

  • 右クリックメニューに追加したい（コピーしてあるメールアドレスへ送る）

    右クリックメニューにあるアクションを登録する方法を教えて下さい。 そのアクションとは、選択されたテキストをコピーし、 アドレス hogehoge@example.com へそのテキストを送信する、というものです。 頻繁に同じような動作をするので、なるべく簡略化したいと考えています。 ご助言お願い致します。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する