web-dev-qa-db-ja.com

Wordテンプレートの最初のページに異なるマージンを作成する

レターヘッドテンプレートがあり、最初のページの左マージンを後続のページより大きくする必要があります。

テキストボックスまたは画像ボックスをヘッダーに配置してテキストをプッシュするオプションを確認しましたが、これによりタブと箇条書きリストのインデントマーカーが表示されなくなります。

2つの列を使用して最初のページを設定し、テキストをプッシュして2番目の列から開始することを考えましたが、2番目のページの作成時にテキストを2番目のページの1列に戻す方法が見つからないテキストがあふれています。

このようなことがどのように可能かを誰かが知っていますか？

ポール、ありがとう

microsoft-wordmicrosoft-word-2010templatesmargins
5
Paul

私はこれが古い質問であることを知っていますが、私が答えを探していたときに私の結果に出てきました。

あなたがする必要があるのは、新しいマージンを適用し始めたいテンプレートのどこかをクリックし、continuousセクション区切りを挿入し、その下のどこかをクリックすることです継続的なセクション区切り、カスタムマージン設定に移動し、「このセクション」に適用を選択します。

これは、「この後」オプションよりも少し優れています。このオプションは、改ページのセクション区切りを挿入します。これは、テンプレートを1ページ長くしたかったため、OPでは機能しません。代わりに連続セクション区切りを挿入することで、1ページのテンプレートを維持でき、ユーザーが2ページ目に到達したときに新しいマージンが自動的に適用されます。

Screenshot of margin settings

4
David Boston

Word 2010+には、「この時点から」マージンを設定する機能があります

  1. 一般的にマージンを設定します
  2. 「この時点から」を選択した状態で、2ページ目にカスタムマージンを設定します。

enter image description here

0
dbJones

うまくいったかどうかはわかりませんが、ヘッダー（またはフッター）を前のページと異なるものにしようとすると、最初のページに影響を与えないようにする唯一の方法です（「別の最初のページ」にチェックマークを付けたため）動作しません）、デザインリボンの[オプション]セクションの右側にあるナビゲーションフィールドで[前にリンク]オプションの選択を解除すると、動作することに気付きました。

0
Bernadette

これは超簡単な方法です。

  1. 挿入セクション区切り（次のページ）からページレイアウト>区切り
  2. マージンを拡大/縮小したいページをクリックします。
  3. ページレイアウト>マージンからカスタムマージンをクリックします
  4. [ページ設定]ウィンドウで、必要なカスタムマージンサイズを入力し、[〜＃〜] ok [〜＃〜]をクリックします。

Custom Margins with Section Break Next Page

これは非常に難しい方法です。

レターヘッドがマクロ対応のブックである必要があります。

  1. 最初のページを適切なマージンでどのように設定するかを設定します。
  2. 以下のコードでマクロを作成します。

コード：

Sub Document_Open()
    If ActiveDocument.Sections.Count > 1 Then Exit Sub

    Selection.EndKey Unit:=wdStory
    ActiveDocument.Range(Start:=Selection.Start, End:=Selection.Start). _
        InsertBreak Type:=wdSectionBreakNextPage
    Selection.Start = Selection.Start + 1

    With ActiveDocument.Range(Start:=Selection.Start, End:=ActiveDocument. _
        Content.End).PageSetup
        .LeftMargin = CentimetersToPoints(2.54) 'CHANGE THIS it's margin of new pages!
        .SectionStart = wdSectionNewPage
    End With

    Application.OnTime When:=Now + TimeValue("00:00:01"), _
    Name:="CheckPages"


End Sub

Sub CheckPages()
    Application.OnTime When:=Now + TimeValue("00:00:01"), _
    Name:="CheckPages"

    If ActiveDocument.Sections.Count = 1 Then
    ActiveDocument.PageSetup.LeftMargin = CentimetersToPoints(5.54)'CHANGE THIS it's margin of first page!
    End If

End Sub
  1. ドキュメントを保存します。
0
angelofdev

私はこれを別の方法で調べましたが、別の最初のページのヘッダーを使用してこれを達成できると思います。ヘッダーを使用してさまざまなマージンを作成する方法の詳細な手順を示す this の記事を参照してください。

0
Adam