(license)みなさん、こんにちは!タカハシ(@ntakahashi0505)です。VBAでいろいろな検索と置換をする方法についてシリーズでお伝えしています。VBAでいろいろな検索や置換をする方法についてお伝えしています。今回はForwardプロパティで検索方向を変える方法、Wrapプロパティで文書全体を検索する方法についてお伝えします。tonari-it.com2017.07.18検索の方向や文書の最後まで検索したときの挙動をコントロールする方法をお伝えしました。Wordではワイルドカードを使った多種多様な検索をかけることができますが、VBAでももちろん実現をすることができます。VBAでワイルドカードを使った検索をする方法についてお伝えします。VBAで色々な検索&置換をする方法Wordでワイルドカードを使った検索をするWordではExcelよりもはるかに高度なワイルドカードを使えるの、ご存知でした?定番は任意の1文字を表す「?」や、任意の文字列を表す「*」なのですが、Wordではほかにも多数のワイルドカードが用意されています。lo@pたくさんありますね~。Wordの検索オプションで「ワイルドカードを使用する」をオンにすれば、これらのワイルドカードを使用することができるようになります。VBAでの検索時にワイルドカードを使用する設定をする場合は、FindオブジェクトのMatchWildcardsプロパティをTrueにする必要があります。Sub「MatchPhrase、MatchWildcards、MatchSoundsLike、MatchAllWordForms、MatchFuzzyパラメーターは、同時にTureに設定することはできません。」という実行時エラーが発生します。...なんという複雑な条件なんでしょう。Wordの検索オプションはデフォルト時には以下のような設定になっています。あいまい検索(日)※MatchPhraseは空白文字を無視する、句読点を無視する、両方の設定を同時に対応したプロパティです。以下の記事で詳細をお伝えしています。VBAで色々な検索や置換をする方法についてお伝えしています。VBAで検索オプションを設定して検索をする方法をお伝えしつつ、その設定をするプロパティ一覧ををまとめています。tonari-it.com2017.07.17つまり、MatchFuzzyがTrueになっているので、ダメだよと怒られちゃっているわけですね。MatchFuzzyプロパティをFalseに設定するですから、以下のようにMatchWildcardsプロパティをTrueにする前に、MatchFuzzyプロパティをFalseにしてあげます。Subこれを実行すると、無事に以下のように「第~位」というワードを検索できるようになるわけです。他の検索パターンも見てみましょう。ページ数を表すパターン例えば、任意の1桁から3桁までの半角数字に「ページ」という文字列を組み合わせたパターンは[0-9]{1,3}ページとすればよいですね。カンマ入りの金額を表すパターンまた、カンマ区切りが入っている任意の半角数字の数値にプラスして「円」の文字列をマッチさせたいときは[0-9,]{1,}円とします。VBAでワイルドカードを使った検索をする方法についてお伝えしました。パターンの作り方は少しややこしいですが、他にも郵便番号や電話番号など様々なパターンを生成できますので、頑張ってトライしてみてください。MatchFuzzyプロパティのオフについては忘れずに!次回はワイルドカードを使った置換の方法についてお伝えしていきます。VBAでいろいろな検索や置換をする方法についてお伝えしています。VBAでワイルドカードを使ってパターンで超便利な置換をする方法をお伝えします。Wordの基本機能でも使えますよ。VBAのFindオブジェクトを使えば色々な条件で目的を探し当てて置換、書式設定、その他、いろいろな処理を施すことができます。プランノーツ代表、コミュニティ「ノンプロ研」主宰。ITで日本の『働く』の価値を上げる!」をテーマに、VBA&GASの開発、講師、執筆などをしております。→詳しいプロフィールはコチラ★ご依頼・ご相談はお気軽にどうぞ!→お問い合わせはコチラ★フォロー頂ければ嬉しいです。「コミュニティ+講座」形式で継続性&教え合える環境も提供。!ノンプログラマーがプログラミングスキルを身に着ける支援ををするコミュニティ。セミナー・もくもく会・Facebookグループのサポートで「自らで学び続ける力をつける」支援、「教え合うことで学びの価値を上げる」場の提供をしています。関連記事Excel・VBA活用術エクセルVBAでフォルダ内のWord文書のページ数・文字数などをリスト化するエクセルVBAでWord文書の操作をする方法についてお伝えしています。今回は、エクセルVBAでフォルダ内のWord文書のページ数や文字数などの各情報を取得してリスト化するプログラムを作っていきます。VBAで複数のドキュメントを一括処理するマクロの作り方をお伝えしています。VBAで全角スペースを検索する方法をお伝えします。Word検索の方法を復習します。VBAで複数のドキュメントに一括処理をする方法についてお伝えしています。VBAでフォルダ内の全てのドキュメントについて、その全体範囲のフォントを変更する方法です。VBAで便利なカーソル移動のショートカットキーを作る方法をお伝えしています。VBAでMoveUntilメソッドを使って句読点単位でカーソル移動をする方法です。VBAを使って便利な入力ツールを作る方法をお伝えしています。VBAで選択範囲の中から最初の段落と最後の段落を取得して、その文字列を出力する方法をお伝えします。VBAで複数のドキュメントを一括処理するマクロの作り方をお伝えしています。VBAでドキュメントファイルをSaveメソッドとCloseメソッドを使って上書き保存する方法です。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント107セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント107セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。ご依頼・お見積などお気軽にどうぞ!お問い合わせフォーム新着記事GASでGoogleスライドのSlideオブジェクトの概要とその取得方法2020.01.162020.01.16【エクセルVBA】ユーザーフォームにコンボボックスを追加する方法2020.01.162020.01.16GASでGoogleスライドを操作するSlidesサービスの基礎の基礎2020.01.152020.01.16GASでGoogleスライドのプレゼンテーションを操作するはじめの一歩2020.01.142020.01.15GASのconsoleクラスのメソッドで実行時間をログ出力する方法2020.01.122020.01.12Facebookページいつも隣にitのお仕事タイトルとURLをコピーしました。