• 締切済み

Word マクロに関する質問です

Wordで大量の文字を青い太字にしたいのですが、マクロの組み方が分かりません。 置換したい文字(例):計算力 実力講座 カレンダー ↑この文字を、青い太字にしたいです。 よろしくお願いします。 WinXP Word2007を使っています。

みんなの回答

  • trajaa
  • ベストアンサー率22% (2662/11921)
回答No.1

マクロじゃなくて置換機能として出来ないでしょうか? 当方、Word2003なので機能的に差違があるかも知れませんが・・・・ Ctrl+Fで検索と置換のダイアログを出し、「計算力」などの対象文字列を設定し、ダイアログ内のオプションボタンを押して置換に関するオプション設定を有効にした上で 書式ボタンからフォントを選択すれば、置換後のフォント書式をお望みの様に設定可能です。 ま、マクロでも出来なく無いでしょうけど・・・・ バージョンも異なるので、表記など微妙に変化があるかも知れませんが・・・ 参考までに。

t3yukimasa
質問者

補足

回答ありがとうございます。 置換でも可能なのですが、置換する文字が大量(10,000個程度)にありまして、出来れば一括で置換をしたいという希望です。

関連するQ&A

  • マクロを使い、特定の文字を青く太字で置換したい

    Wordで大量の文字を青い太字にしたいのですが、マクロの組み方が分かりません。 置換したい文字(例):計算力 実力講座 カレンダー ↑この文字を、青い太字にしたいです。 WinXP Word2007を使っています よろしくお願いします。

  • マクロを使い、特定の文字を青く太字で置換したい

    Wordで大量の文字を青い太字にしたいのですが、マクロの組み方が分かりません。 置換したい文字(例):計算力 実力講座 カレンダー ↑この文字を、青い太字にしたいです。 (置換したい文字が、10,000程度あります) WinXP Word2007を使っています 非常に困っております。 何卒、よろしくお願いします。

  • WORDで書式などを利用して置換するマクロをつくりたいです

     WORD2000で書式などをキーにして置換するマクロをつくりたいです。  例)太字の文字列すべてを『♂』『♀』で囲む  これをVBAで表記するにはどう書いたらよいでしょうか?

  • ワードのマクロについて

    お世話になります。 エクセルのマクロについてはここでよくアドバイスをもらっていますが、今回ワードでの処理について教えてください。 1つのフォルダにワード文書がたくさん入っています。 各ワード文書に対し以下の操作を自動化させたい。 1.すべてを選択(ctrl+A) 2.置換で「改行」をすべて削除   あいまい検索のチェックをはずした上で 検索する文字列 ^p  置換後の文字列は「空白」   すべて置換 3.置換で「スペース」をすべて削除   あいまい検索のチェックをはずした上で 検索する文字列 ^w  置換後の文字列は「空白」   すべて置換     4.すべてを選択 5.メニュー→書式→文字種の変換→全角にチェック→OK    ですべての文字を全角にする まとめると「すべての改行、スペースを削除し、全文字を全角に統一する」 この作業をフォルダ内の全ワード文書に対して一括で処理できないでしょうか? ちなみにワード文書は元々メモ帳(*.txt)で作成されていたものをリネームソフトで拡張子を*.docに変換したものです。そのためファイルを閉じるときに「書式なし形式で使用できない機能が含まれています」と聞いてきますが「はい」でOKです。 アドバイスおねがいします。

  • Wordの置換がマクロ記録できない

    Word文書を作成しています。 複数の単語の、色を変えたいと思い。 置換をマクロで記録をしてみたのですが、実行してもなにも起こらないのです。 これはなぜなのでしょうか? ちなみに置換しているのは色のみで、文字はそのままです。 また他にもマクロのような一括でできる機能などはないのでしょうか? よろしくおねがいいたします。

  • ワードの置換機能で、書式を置換しましたら、一点わからないことがあります

    ワードの置換機能で、書式を置換しましたら、一点わからないことがあります。 文書全体の、「太字」を全て「斜体」に変えようとして、 置換を使って、検索する文字列の書式を「太字」、置換後の文字列の書式は「斜体」を 設定したところまでは良いのですが、 結果が、全て太字の文字が斜体に変わっているのです。 置換を使って、文字色を変えると、前の色が残ることなく変わるのですが、 太字の場合は、なぜ残ってしまうのでしょうか。 他のやり方でかえることもできるのはわかりますが、 置換機能を使って変えたいので、 その理由がわかる方、 どうか教えてください。

  • ワードで複数の文字を一括・連続置換するマクロ

    ワード(Word)で複数の文字を一括・連続置換するマクロを作りたいのです。 次の回答を参考にしてマクロを作ってみました。 http://oshiete1.goo.ne.jp/kotaeru.php3?q=994495 ところが、置換したい単語が100くらいになってきて扱いづらいので、 ワード(又はテキストやエクセルでも可)の置換文字のリストのファイルを参照して、同じように連続置換させたいのですが、どのような方法があるでしょうか? シェアウェアでも同様の機能をもつものがありますが、自由にカスタマイズできないので使えません。 (置換後の文字列に蛍光ペンをかけたいので)

  • ワードでマクロがうまくいきません。

    よろしくお願いします。 マクロの知識はほとんどないのですが、 「マクロの記録」の機能を使い、ワードで 「スペースを探し出し、そのスペースにアンダーラインを引く。」 ために、 -------------------- 編集ー置換ー 検索する文字列にスペースをタイプ、 置換後の文字列にスペースをタイプ、 オプションの書式で、フォント、下線、一重下線 すべて置換 -------------------- マクロの記録を選択した後、上のように作業しました。 そしてマクロの記録をとめました。 マクロの記録中の操作では、思い通りに置換されるのですが、 次にそのマクロを作動させると、なにもおこりません。 なにか変な操作をしたのか、と五度くらい試したのですが、 やはり動きません。 中身は、↓のようでした。 -------------------- Sub Macro2() ' Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = " " .Replacement.Text = " " .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchByte = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = True End With Selection.Find.Execute Replace:=wdReplaceAll End Sub -------------------- どうしてうまく動かないのでしょうか。 教えていただけるとありがたいです。よろしくお願いします。

  • Wordで桁を区切るマクロを作りたい

    いろいろ調べたのですが、わかりません。 Wordで桁区切りのマクロを作りたいんです。 どなたかお願いします。 ちなみにやってみてできなかったのは ・Excelを開いて桁区切りして結果をコピーする。 ・IMEを使う ・手でカンマをいれる ・置換はカンマをあらわす特殊文字がない。 ・特殊文字の挿入 ・関数の使用 なにかいい方法ないでしょうか。 目的はツールバーにExcelのような桁区切りマクロを作ることです。

  • Word文書のワードアートのテキストをマクロで変更

    お世話になります。 Word文書のワードアートのテキストをExcelマクロで変更する方法を教えてください。 Wordアプリケーションへの参照と、該当Word文書への参照と、変更したいテキストがあります。 試したこと: 1)Word2007で、マクロを記録してからワードアートのテキストを変更してみたが、マクロには何も記録されなかった。 2)該当Word文書のShapes や InlineShapes を参照してMsgboxで表示してみたが、テキストボックスに設定したテキストしか画面に表示されなかった。 何をやっているのか?: 教室のパンフレットを作ろうとしています。同じような書式で、曜日とか時間とか講座名とか費用とか・・だけ違うパンフレットを大量に作るのですが、いちいちデータを変更していると面倒なので、 Excelシートにデータを出力しておいて、Wordで作った雛形のなかの、曜日とか時間とか講座名とか費用とかの部分だけ変換してやればいいじゃないか、と考えたわけです。 そこで、Excelシートのどのシートのどのセルに、曜日とか時間とか講座名とか費用とか・・・が入っているかというデータを用意しまして、そのブック(ブックM)に、こんなマクロを作ったのです。 1.Excelデータ(ブックD)をオープン 2.ワード文書の雛形をオープン 3.ブックMの1行目から順に・・・   3-1.曜日とか時間とか・・という項目名などを取得   3-2.ブックDから該当するデータを取得   3-3.データの先頭や末尾の、不要な部分を適宜切捨て   3-4.ワード文書で置換を実行 こんな感じのマクロです。 ワード文書の雛形には、「開講する講座:#講座名#(#コース名#)」などと記述してありますので、 #講座名#を「陶芸を楽しむ」  #コース名#を「入門」 などと変更してやれば、パンフレットが出来上がるのです。 しかし、ワードアートのテキストを#講座名#にしておいても変更されないし、マクロの記録もできないし・・で困っております。 お答えをいただければ幸いです。