Wordで用紙に三つ折り用の線を引きたいのですが…

質問

Word2003です。

Wordで用紙に三つ折り用の線を引きたくて、
ネットでいろいろ調べていたら、下のURLで次の方法を見つけました。
http://ciao.aoten.jp/ciao/2006/07/post_820b.html

内容は、
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
用紙内に水平の直線を2本引いた後、それらを選択して、
「図形の調整」→「配置/整列」→「用紙に合わせる」をクリックし、つづけて、
「図形の調整」→「配置/整列」→「上下に整列」をクリックします。
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
というものです。

なるほどと思い、やってみたのですが、
よくよく見てみるとなぜかきれいに３分割になっていません。
実際に上記のＵＲＬにある結果画像も
拡大して距離を測ってみるとこちらも３分割になっていません。
（記事では３分割になっている、ということのようですが）

理屈では３分割になりそうなものですが、
この方法では３分割にならないでしょうか。
また、配置整列以外の方法で間単に３分割にする方法があれば教えてください。

回答No.4

esupuresso · ベストアンサー

NO1です
「ページ設定」の余白を全て０
とじしろの位置を「上」
書式から「段組み」を選択→段数を「３段」に設定して「境界線を引く」にチェックを入れます
「段の幅」は「23.39」になると思います
「間隔」は「0字」に設定
設定対象を「文書全体」
これでプレビューにて確認しましたが３分割全て「8.3ミリ」になってることを定規で確認いたしましたが・・・？
用紙は「A4版」用紙の向きは「横向き」にて設定しております

補足

再度のお返事ありがとうございます。
失礼しました。３分割確認できました。

最初にいただいた回答では
「「間隔」は「0字」に設定」というのがありませんでしたので
それを行っていませんでした。
「0字」にしたところ確かに３分割になりました。

こういうやり方もあるんですね。
いやはや奥が深いです。
ありがとうございました。

回答No.5

enunokokoro

標準の機能ではできませんね。
紹介している記事も、別の質問者から参考にした記事として拝見させて
もらってますが、簡単なものとしては活用できますが実用的には均等の
分割にならないので使いものにならないですよね。

希望にそう設定は、ページサイズを計算したもので各線に対して設定を
するか、マクロを使うしか方法は無いですね。

過去ログで紹介していたマクロを私なりに編集したものを載せますので
参考にしてください。

'-------------------------ここから---------------------------
Sub SepPageYoko()
'用紙に横線を引くことで縦方向に分割します。
Dim Tate, Yoko, IB, Sep, i
Tate = ActiveDocument.PageSetup.PageHeight
Yoko = ActiveDocument.PageSetup.PageWidth
On Error GoTo Fin
IB = InputBox("分割数を入力してください")
Sep = Tate / IB
For i = 2 To IB
ActiveDocument.Shapes.AddLine _
(0, (i - 1) * Sep, Yoko, (i - 1) * Sep).Select
With Selection.ShapeRange.Line
.Weight = 0.75
.DashStyle = msoLineDash
.ForeColor.RGB = RGB(200, 200, 200)
End With
Next
Fin: End Sub
'-------------------------ここまで---------------------------

上記マクロを実行すると、インプットボックスが表示されますので半角
の数字で分割数の「３」を入力します。
線の太さや色、線の種類は以下のところで設定してますので内容を変更
すればイロイロ使えると思います。
線の太さ
　.Weight = 0.75　←ここの数値はオートシェイプの線の太さと同じ
線の種類
　.DashStyle = msoLineDash　←ここの種類を調べるにはマクロ記録で
線の色
　.ForeColor.RGB = RGB(200, 200, 200)　←ここの数字は線の色にて
　[その他の色]→[ユーザー設定]タブで指定している色と同じ数値。

細かいところは使う側でカスタマイズしてください。

補足

お返事ありがとうございます。
教えていただいたマクロやってみましたがすごいですね。
しかも線の種類も太さも色も選べるとは。
マクロはさっぱりわからないのですが興味がわきました。

そんなに頻繁に使う操作ではないので
実際にマクロを設定するまではしないかもしれませんが
別の意味でも、とても参考になりました。

回答No.3

koko88okok

用紙に合わせる以外の整列は、よく使っているので試してみました。

直線と正方形の2種類でやってみましたが、いずれも仰るとおり3等分されませんでした。共通して下側が広く、上の2個はほぼ等間隔でした。2等分も同様でした。

本題ですが、A4用紙の場合は3等分すると、1箇所が99mmですから、高さが99mmのオートシェイプを上下に3個並べておいて、それを目印に三つ折用の線を引くのはいかがでしょう？

なお、その線はヘッダーに挿入しておくと、編集などの邪魔になりませんし、ウッカリ動いてしまうことの防止になると思います。

補足

お返事ありがとうございます。

投稿後もいろいろやっていましたが、
どうやら質問内容に書いた方法ではできなさそうな気がしてきました。
特に用紙を横向きにした場合の等分はズレが著しいです。

教えていただいた内容ですが、
やはり用紙サイズを３等分した数値が必要になりそうな感じですね。
電卓使えば割り算も一瞬なんですが
なんというかすっきりしないです。

まあでもそういう仕様なんでしょうね。

回答No.2

mshr1962

線を右クリックして「オートシェープの書式設定」→「レイアウト」
「詳細設定」を押して縦・下方向の距離を「ページ」を基準にして
用紙の1/3と2/3の位置を指定してみては？

補足

教えていただいた方法は思いついていたのですが
用紙サイズを３分割する計算の手間がやや面倒なように感じまして。

なんとかWordの機能を使って
単純明快に３分割にできないものかと思っています。

ですがその方法しかないんでしょうかね。

回答No.1

esupuresso

３分割する方法は「ページ設定」の余白を全て０にしてから行います
印刷の向きを決めた後、書式から「段組み」を選択→段数を「３段」に設定して「境界線を引く」にチェックを入れます
それから３段目まで段落記号が移動するまで「Enter」キーを押し続けます
３段目の境界線が出た時点でプレビューを見てみてください

補足

お返事ありがとうございます。
教えていただいた内容をなるほどと思ってやってみたのですが
結果、距離を測ってみるとこちらではきれいに３分割になっていません。
そちらではきれいに３分割になりますでしょうか。