エクセル2010で、結合したセルの中に罫線を引くには？

例えば三段のセルを結合して、その中に三段分の長い文章を打ち込んで、「折り返して全体を表示する」と、一つの白い大きいセルの中に文章全文が三段に折り返して表示されますが、その文章に罫線を引いて三段に分けたいのです。試してみましたが「セルの書式設定」ではできないようです。どうすればセルの中に罫線を引けますか？

質問者からの補足コメント

• 

  皆さんありがとうございます。例えばの「三段」は「三行三列」のことです。説明不足で申し分けありません。

    補足日時：2016/02/15 21:24

• 

  皆さんありがとうございました。色んな方法を学習させて頂きました。VBAがパーフェクトでとても良かったんですが、私にはVBAは使えなくて残念でした。

    補足日時：2016/02/17 10:09

No.1 回答者： mai3456 回答日時： 2016/02/14 21:12

①三段のセルを結合を解除しないとできません。

②もしするならば文字にアンダーラインを付けるということになります。
③または、挿入-図形から「線」を指定指定して引く。この場合、セルに固定できないので、四角図形と文字と線ををつくり、グループ保存する。
これでも、セルに依存しませんので、使い勝手によっては不便です。
①が一番楽です。

この回答へのお礼

ありがとうございました。

お礼日時：2016/02/15 08:24

No.2 回答者： bathbadya 回答日時： 2016/02/14 21:23

No1さんの回答に追加して、画像（たとえば原稿用紙）を張り付けるとか…

でも、画像が邪魔でセルの編集ができないので、いちいち画像をどけてやる必要があります。

この回答へのお礼

ありがとうございました。

お礼日時：2016/02/15 08:25

No.3 回答者： xs200 回答日時： 2016/02/14 22:14

セル内に図形(線)を挿入すればセルの幅を変化させても線の長さはセル幅と同期します。

文字は縦位置を上詰めにしておけばいいです。

この回答へのお礼

ありがとうございました。できました。

お礼日時：2016/02/15 21:15

No.4 回答者： tom04 回答日時： 2016/02/14 22:39

こんばんは！

VBAになりますが一例です。
オートシェイプの直線をセル上に配置する方法です。

画面左下の操作したいSheet見出し上で右クリック　→　コードの表示　→　VBE画面のカーソルが点滅しているところに
↓のコードをコピー＆ペースト　→　Excel画面に戻り（VBE画面を閉じて）
マクロを実行してみてください。
（Alt＋F8キー　→　マクロ　→　マクロ実行です）

Sub Sample1() 'この行から//
Dim k As Long, cnt As Long, c As Range
Set c = Selection
cnt = c.Rows.Count
For k = 1 To cnt - 1
With Shapes.AddLine(c.Left, c.Top + c.Height / cnt * k, c.Left + c.Width, c.Top + c.Height / cnt * k).Line
.ForeColor.RGB = vbBlack
.Weight = 0.5
End With
Next k
End Sub 'この行まで//

※　必ず結合されているセルを選択し、マクロを実行してください。
※　仮に3行結合している場合、3行の文字列が入力されているという前提です。
（何行結合されていても構いません）

尚、消去するコードも必要だと思いますので、
同じVBA画面の前述のコードが記載されている行の下に
↓のコードを追加し、「削除」のマクロを実行すると
直線が消えます。

Sub 削除()
Dim mySp As Shape, myRng As Range
Set myRng = Selection
For Each mySp In ActiveSheet.Shapes
If mySp.Top >= myRng.Top And mySp.Top <= myRng.Top + myRng.Height Then
If mySp.Left >= myRng.Left And mySp.Left + mySp.Width <= myRng.Left + myRng.Width Then
mySp.Delete
End If
End If
Next mySp
End Sub

こんな感じではどうでしょうか？m(_ _)m

この回答へのお礼

ありがとうございました。すごい技術ですね。

お礼日時：2016/02/15 21:15

No.5 回答者： enunokokoro 回答日時： 2016/02/14 23:23

三段とは、三行一列のセル範囲という意味ですよね。

これを結合して折り返しする方法でないと駄目ですか？

Excelの機能にある[文字の割り付け]を使う方法なら、希望していることに
近いと思います。
http://ciao.aoten.jp/ciao/2012/03/post-d2c6.html
http://hamachan.info/win7/Excel/warituke.html
http://www4.synapse.ne.jp/yone/excel2010/excel20 …

この回答へのお礼

ありがとうございました。こんな方法もあるんですね。ただ例えば三行三列ですので「結合されたセルの一部を変更することはできません。」との表示が出てしまいました。

お礼日時：2016/02/15 21:20

No.6 回答者： koko88okok 回答日時： 2016/02/14 23:58

結合したセルに罫線は引けませんので、結合していないセルの上に、問題のセルの内容を画像としてリンク貼り付けしては如何でしょう？

その操作例を下記します。

1. 同じSheetの邪魔にならない場所 または 別なSheetの任意の場所に、接合したセルをコピペして、罫線なしに設定しておきます。
（単に、そのSheetをコピーするだけでも良いと思います。）

2. セルを結合したセルの結合を解除します。

3. 「クイック アクセス ツールバー」に「カメラ」ボタンを表示します。

「カメラボタン」
http://hamachan.info/excel/kamera.html

4. 結合したセルを選択して、「カメラ」ボタンを押しますと、セルをコピーした時と同様の点滅する破線が表示され、マウスポインタが小さな十字に変化します。

5. マウスポインタを結合したセルの左上の罫線の交点に重ね、[Alt]キー押しながら、クリックしますと、画像が貼り付けされます。

6. 最後に、貼り付けられた図が貼り付けられた状態で、「図ツール」－「書式」の「図のスタイル」グループの右端にある小さな四角形（ダイアログボックス 起動ボタン）をクリックして、表示されるダイアロブボックスの左窓にある「塗りつぶし」で、「塗りつぶしなし」に、「線の色」で、「線なし」を設定して「閉じる」ボタンを押します。
（画像で隠れた罫線が見えるようになります。）

この回答へのお礼

ありがとうございました。カメラがあるんですね。場面によっては便利に使えそうですね。元のセルを消去すると新たなセルも消去されてしまうので、元のセルをどこかにとっておかなければならないのが難点だと思いました。

お礼日時：2016/02/16 08:28

No.7 回答者： pomyoshi 回答日時： 2016/02/15 14:17

①そのセルを右クリックする

②「セルの書式設定」をクリックする
③「フォント」を選択し、下線から文字の下に引く線を選択する

この回答へのお礼

ありがとうございました。

お礼日時：2016/02/15 21:31

No.8 回答者： pomyoshi 回答日時： 2016/02/15 14:23

①そのセルを右クリックする

②「セルの書式設定」を選択する
③メニュー「フォント」を選択後、サブメニューの「下線」から文字の下に引きたい線の種類を選択します。

この回答へのお礼

ありがとうございました。文字の下線ではなく、文章と文章の中間に点線を引きたいのですが。

お礼日時：2016/02/15 21:30

No.9 回答者： xs200 回答日時： 2016/02/15 21:44

No.3の方法で線をちょっとだけセルの右端から飛び出させてください。

これでセルの幅を変えても線は追従してくれます。

この回答へのお礼

細かいところまでありがとうございます。さらに拡大して作業するとやりやすいと思いました。

お礼日時：2016/02/16 08:29

No.10 回答者： koko88okok 回答日時： 2016/02/15 21:57

No.6です。

> 例えばの「三段」は「三行三列」のことです。説明不足で申し分けありません。

それでしたら、
手順 2.の 『セルを結合したセルの結合を解除します。』だけを次のように変更してください。
（その他の手順はすべて同じです。）

結合されたセルを選択して、「ホーム」タブの「配置」グループにある「セルを結合して中央揃え」の直ぐ右にある▼を押して、「横方向に結合」を選択しますと、横方向に3個のセルが結合された3行のセルに変わります。

この回答へのお礼

ありがとうございました。

お礼日時：2016/02/16 20:25