Word2007ヘッダー、フッターの文字列を置き換える方法とは？
- Word2007を使用している際にヘッダーとフッターの文字列を自動的に置き換える方法について知りたいです。
- ヘッダーやフッターには「$replace01」という文字列がありますが、DocumentのOpenイベントで自動的に置き換える方法を教えてください。
- ヘッダーやフッターにフォーカスがある場合、Selection.Find.Executeを使用して文字列を置き換えることができますが、ファイルを開いた時にはSelectionがヘッダーやフッターにならないため上手くいきません。別の方法があれば教えてください。
- ベストアンサー
【Word2007】ヘッダー、フッターの文字列を置き換えたい
Word2007を使っています。 ヘッダー、フッターの文字列を置き換えるマクロを 作りたいと思っています。 ヘッダー、フッターには「$replace01」のような文字列があり、 それをDocumentのOpenイベントで自動的に置き換えたいと思っています。 ヘッダー、フッターにフォーカスがあれば、 Selection.Find.Executeで文字列が置き換えられそうだと、 マクロの記録をして分かりました。 しかし、ファイルを開いたときには、 Selectionがヘッダー、フッターにないため、 うまくいきません。 何か方法はございませんか？ もしご存知でしたら、教えてください。 よろしくお願いいたします。
- rock123
- お礼率92% (243/262)
- オフィス系ソフト
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
こんにちは。 ヘッダー、フッターを編集するところから、マクロのレコーディングを開始すれば良いと思います。 試しにヘッダーをやってみました。 ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader では。
関連するQ&A
- Wordマクロで目に見える文字列だけを探すには
Word2000のマクロで、目に見える文字列だけ（つまり空白・改行・タブなどは対象外）を探す方法はありますか。 操作をマクロに記録してみましたが、「任意の1文字」を選ぶと、改行とかの「目に見えない」文字まで検索されてしまいます。 そこで、 Selection.Find.ClearFormatting With Selection.Find .Text = "^?" の "^?" を、「目に見える文字列」を指す内容に変えられますか？ それが無理なら、何かほかに簡単な方法はないでしょうか。 マクロは素人なので、複雑なことはできないです。 よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- 「ヘッダーフッター」のヘッダーの文字のサイズ
エクセルのマクロの記録で 印刷設定の ページ設定の「ヘッダーフッター」のヘッダーの 中央部に文字を入れて その文字のサイズを１１から２０に変更する記録を取りたいのですが 記録結果を見てみると サイズの部分が記録してないように見えます、 With ActiveSheet.PageSetup .CenterHeader = "あああ" で、ヘッダに表示する文字の記録はできています。 このような場合VBAでサイズの設定をするには どうすればいいでしょうか？ 手作業で２０にしても、１１に戻ってしまいます。
- ベストアンサー
- オフィス系ソフト
- 【Word VBA】フッターのページ番号の横に文字列を挿入する方法
【Word VBA】フッターのページ番号の横に文字列を挿入する方法 今日は，質問させていただきます.どうぞよろしくお願いいたします. Word2003もしくはWord2007でお願いいたします． フッターの中にページ番号を挿入するのは Word.Document.Sections(1).Footers(1).PageNumbers.Add PageNumberAlignment:= wdAlignPageNumberRight,FirstPage:=True でできたのですが，このときにページ番号の横に「test-」という 文字を入れておく方法が分かりません．．． ページ番号が「test-1」，「test-2」，「test-3」・・・ となるようにしたいのですが．．． Excelでもそうですが，VBAを自動記録すると「Selection」ばかりになって 汎用性が無いように感じますので，もし可能でございましたら「Selection」の 入っていないコードでお教えいただければと思います． もしお詳しい方がいらっしゃいましたら,どうぞよろしくお願いいたします．
- ベストアンサー
- その他MS Office製品
- Word2010特定の名前を置き換えるマクロ
例えば、Wordの文章で「田中」とあるものを「山田」に変えたい場合は、置き換えの機能を使ってマクロの記録ができると思います。 しかし、こうするとテキストボックスやヘッダフッタに記載された文字は変更できないように思います。 どうすれば、これらの文字も含めて置換の対象とすることができるか教えてください。 Sub Macro() Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "山田" .Replacement.Text = "田中" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchByte = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = True End With Selection.Find.Execute Replace:=wdReplaceAll End Sub
- ベストアンサー
- Word（ワード）
- ワードでマクロがうまくいきません。
よろしくお願いします。 マクロの知識はほとんどないのですが、 「マクロの記録」の機能を使い、ワードで 「スペースを探し出し、そのスペースにアンダーラインを引く。」 ために、 -------------------- 編集ー置換ー 検索する文字列にスペースをタイプ、 置換後の文字列にスペースをタイプ、 オプションの書式で、フォント、下線、一重下線 すべて置換 -------------------- マクロの記録を選択した後、上のように作業しました。 そしてマクロの記録をとめました。 マクロの記録中の操作では、思い通りに置換されるのですが、 次にそのマクロを作動させると、なにもおこりません。 なにか変な操作をしたのか、と五度くらい試したのですが、 やはり動きません。 中身は、↓のようでした。 -------------------- 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 -------------------- どうしてうまく動かないのでしょうか。 教えていただけるとありがたいです。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- ワードで1枚目だけヘッダーに文字をいれ、フッターにはすべてにページ番号を入れたい
ワード２００３です 1枚めのヘッダーに文字を入れ すべてのページのフッターにページ番号とページ数を入れたいのですが教えてください。 ページ設定→その他で先頭ページのみ別指定にチェックを入れ、ヘッダーに文字、フッターにページ番号とページ数を入れたのですが、１枚目にはヘッダーに文字、フッターにページ番号と総ージ数が入るのですが２枚目以降のフッターにページ番号とページ数が入らないのです。 宜しく御願いします。
- ベストアンサー
- オフィス系ソフト
- TeXのヘッダとフッタについて
TeXのヘッダとフッタについての質問です。 ヘッダには偶数ページは右詰めで、奇数ページは左詰めで同じ文字列を表示して、フッタにはページ数を表示したいのですが、いろいろ検索して調べてみたのですが方法が分かりませんでした。 どなたかご教授願えませんでしょうか？ 宜しくお願い致します。
- ベストアンサー
- その他（プログラミング・開発）
- POWERPOINTのヘッダとフッタ
お世話になっております。 POWERPOINTのヘッダとフッタにWORDみたく文字や図を入れたり出来ないのでしょうか？ 可能であれば方法を教えて頂きたく宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- ヘッダーとフッターのツールバー
ヘッダーとフッターのツールバー ワード２００３を使用しています。 メニューバーの「表示」をクリックするとドロップダウンメニューの中に「ヘッダーとフッター」がありますが、文字の左にボタンが表示されてますよね。 その場合は、ツールバーにボタンとして登録されているんですよね。 でも、メニューバーの下のツールバーには「ヘッダーとフッター」のボタンがありません。 いったいどこにあるのでしょうか？
- ベストアンサー
- オフィス系ソフト
- ワード文書をエクセルに取込むマクロ（ヘッダ：フッタ）
お世話になります。 表形式となっているワード文書のヘッダ、フッタをエクセルに取込む マクロをご存知の方、ご教授お願いいたします。
- 締切済み
- オフィス系ソフト
お礼
ありがとうございます。 そうすれば良かったのですね。 とても参考になりました。