父から質問を受けたので教えてください。
WORD2000,Windows Meを使っています。

B4サイズ、縦書き、20文字×26行で書類を作りたいそうです。
その際行ごとに線が引かれたものを印刷したいと・・・。
行グリッド線を印刷したようなイメージにするにはどうしたら良いでしょうか?
横書きの場合は作れるのですが、縦書きがわかりません。

このQ&Aに関連する最新のQ&A

A 回答 (2件)

まず、文字数、行数を指定して文書を作成するには、[ファイル]-[ページ設定]で、「原稿用紙の設定にする」を選び、文字数、行数を指定します。



で、1行ごとに線を引くには、
1:線を引く範囲を選択する。
2:[罫線]-[線種とページ罫線の設定]を実行。
3:線の太さや色を選んだ後、「プレビュー」のところの行の真ん中の部分と、行の下の部分をクリックする。(ちょっと文字では伝えづらいです(^^;)。分からないときは、いろいろ試してみてください。)
4:OK!

のようにします。
    • good
    • 0
この回答へのお礼

実は質問した後、1人で試行錯誤していてできたんです。
回答の方が後になってしまったのですが、同じ方法でした。

父は文字を入れる前にそういう設定をしたがっていたのですが、
先に文章を打てばいいんですよね。
ありがとうございました。

お礼日時:2001/05/27 16:05

こんにちは


既に文字数と「行数に指定方法」と「縦書き」及び
「グリット線の表示」の方法はご存知との前提で書き
ます。

(オートシェイブを使った方法です)
1.表示 → ヘッダーとフッダー
2.オートシェイブ(図形描写)直線選択
3.グリットに合わせて縦線を1本引く
(微妙な位置合わせは、表示倍率を上げて行うと楽です)
4.描写した縦線を選択後[Shift]+[Ctrl]を押しながら
  ドラッグして次のグリットへ(縦線の複写)
5.全部の縦線が引かれたらグループ化
6.オブジェクトの書式設定 → 文字列折り返し[なし]
7.「ヘッダーとフッダー」 を閉じる

以上で改ページしてもこの線は引き継がれます。

>横書きの場合は作れるのですが
横書きでも同様に可能です。
    • good
    • 0
この回答へのお礼

回答ありがとうございました。父に教えてみたいと思います。父は今までパソコン使ったことがないのに、会社で導入され肩身がせまくなったみたいでワードとエクセルの特訓中なのです。

お礼日時:2001/05/27 16:09

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qグリッド線が表示されるファイルとされないファイルがあります。

同じパソコンで見ているのに、グリッド線が表示されるファイルとされないファイルがあります。
いつもは、「よこ」の線しか表示されないのに、特定のファイルを開くと、「たて」の線も表示されてしまいます。

「たて」のグリッド線が表示されるファイルは、リッチテキスト形式です。

また、そのファイルを他のパソコンで開くと、「よこ」の線しか表示されません。

パソコンによって、表示が異なったり、ファイルによって表示が異なるようですが、どうしてですか?

Aベストアンサー

WORDとして・・・設定次第です。

グリッド線を自在に表示: 下記参照願います。
http://kokoro.kir.jp/word/grid.html

Q名刺を縦長、縦書きで印刷したい

名刺を「エーワン」の51002-カードに日本の昔ながらの縦長、縦書きで印刷したいのですが、うまくいきません。ラベル屋さんやWORDでは、カード横長のデザインでないと駄目なのでしょうか?

Aベストアンサー

フォント名の前に「@」を付けると左に90度倒れます。
横長のカードに印刷すると、縦置きしたとき縦書きになります。

Wordの「宛名ラベル作成」では、フォントの指定が出来ませんので、
まず、普通の文書に必要事項を入力して、範囲指定してフォントを選んでフォントの前に @ を半角で入れます。
その時点で文字が横倒しになっていると思います。
コピーしてから、「宛名ラベル作成」を開きます。
貼り付けの動作をしなくても、ラベルに表示されていると思います。
「ラベル屋さん」では検証していません。

Qアクセスのフォーム印刷で不要な線が印刷されるのですが

アクセスのフォーム印刷で2枚目にデータ以外の不要な細い横線がどうしても印刷されてしまいます。デザインモードで見てもどこにその線があるかわからないのですが、テキストボックス以外は不要なのでキレイにしたいです。
消し方をアドパイス頂けないでしょうか。
(フォームでデータのみ印刷しています。)

Aベストアンサー

線が消えませんか。
困りましたね。それでは・・・。

"デザインビューでレポート作成する"で新しい、ブランクのレポートを作成。
既存の線が入るレボート詳細で、必要なオブジェクトのみ選択し、コピー。
作成したブランク レポートの、詳細にペースト。
レポートのプロパティのデータタブ、レコードソースに、既存レコードと同じ名前を入力。

これでどうでしょう。

Q部品表ごとに枠線を引く方法教えてください。。。

知恵をおかし下さい。
以下の部品表があるとします。(初めは枠線は無いとします)
例えば、親品目AはX,Yによって製造されます。
ボタン一つで親品目ごと枠線を自動で引く方法を教えてください。
   A列    B   
1 親品目   子品目
  _______ 
 | A    X  |    
3| A    Y  | 
 |_____ |
  _______  
4|  B   X  |
5|  B   Y  | 
6|  B   Z   | 
 |______|
VBAを使って作成したいと思っています。よろしくお願いします。

Aベストアンサー

以下のマクロをALT+F11でVBE画面を開き、左上のVBA Projectでシート名を右クリックし「挿入」→「標準モジュール」で表示される画面に貼り付けて下さい。マクロの実行はALT+F8でマクロ一覧を開き、マクロ名を選択して「実行」ボタンです。

Sub Macro1()
Dim ptrS, idx As Long
 ptrS = 2
 For idx = 2 To Range("A65536").End(xlUp).Row
  If Cells(idx, 1) <> Cells(idx + 1, 1) Then
   Range(Cells(ptrS, 1), Cells(idx, 2)).Borders(xlEdgeTop).LineStyle = xlContinuous
   Range(Cells(ptrS, 1), Cells(idx, 2)).Borders(xlEdgeBottom).LineStyle = xlContinuous
   Range(Cells(ptrS, 1), Cells(idx, 2)).Borders(xlEdgeLeft).LineStyle = xlContinuous
   Range(Cells(ptrS, 1), Cells(idx, 2)).Borders(xlEdgeRight).LineStyle = xlContinuous
   ptrS = idx + 1
  End If
 Next idx
End Sub

マクロをボタンに割り付けるにはシート上にオートシェイプの四角形を描き、シェイプ右クリック→マクロの登録→マクロ名選択で行うことができます

以下のマクロをALT+F11でVBE画面を開き、左上のVBA Projectでシート名を右クリックし「挿入」→「標準モジュール」で表示される画面に貼り付けて下さい。マクロの実行はALT+F8でマクロ一覧を開き、マクロ名を選択して「実行」ボタンです。

Sub Macro1()
Dim ptrS, idx As Long
 ptrS = 2
 For idx = 2 To Range("A65536").End(xlUp).Row
  If Cells(idx, 1) <> Cells(idx + 1, 1) Then
   Range(Cells(ptrS, 1), Cells(idx, 2)).Borders(xlEdgeTop).LineStyle = xlContinuous
   Range(Cells(...続きを読む

Qエクセルの算式について 種類を同じ項目ごとにまとめて、その項目ごとの数

エクセルの算式について 種類を同じ項目ごとにまとめて、その項目ごとの数量を合計するには、どの様な算式を使えばいいのでしょうか?種類の欄には数十種類の項目が有りどの種類の項目が来るかわかりません。ですので集計側にあらかじめ候補を出しておいての集計は出来ません。どうかお知恵を貸して下さい。よろしくお願いします。

Aベストアンサー

その通りにデータをエクセル上に記入してから,
D2に
=IF(ROW(A1)>COUNT(1/FREQUENCY(A:A,A:A)),"",SMALL(IF(ROW($A$2:$A$15)=MATCH($A$2:$A$15,A:A,0),$A$2:$A$15),ROW(A1)))
という式を(これをコピーして)入れて,必ずコントロールキーとシフトキーを押しながらEnterで,忘れず間違えずに入力して,下向けにコピーしておきます

E2に
=IF(D2="","",SUMIF(A:A,D2,B:B))
と普通に入れて,下向けにコピーしておきます。



ただし,こんなイミフメイの式をただ写して使ってもあとで困るだけです(実はホントのデータはこうではありませんでした,答えを聞けば出来ると思ったけど出来ませんでしたになる場合も多いです)から,

推奨手順:
空っぽのD1セルを選ぶ
データタブの「統合」を開始する
AB列を追加する
左端列にチェックしてOKする

と,必ず答えが出てきます。


人気Q&Aランキング

おすすめ情報