![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?a65a0e2)
No.12ベストアンサー
- 回答日時:
No.5の回答者です。
> 「三段」は「三行三列」のことです。
難しい課題ですね。
他の回答者さんも書いているように、図形の[直線]を使わないで罫線を
引けるのは、三行を結合していない場合だけですよね。
列においても、3列を結合していると[文字の割り付け]が使えません。
この場合は、列の結合も解除するなどして、[文字の割り付け]を三列に
配置するように、他の方法を検討するしかないと思います。
私なりの考えた方法:
三行三列の範囲で結合してある状態を解除します。
これで左上だけに入力した文章が残ります。
三行三列を選択して、[セルの書式設定]の[配置]タブを開きます。
[横位置]のプルダウンメニューから[選択範囲内で中央]を選択します。
左上から複数列にまたがっていた文章が、最初の行の三列のみになり、
文章の前後が見えない状態になったと思います。
その状態で[文字の割り付け]を実行。
三列内での三行に文字が割り付けられたと思います。
罫線を行単位で点線で設定。これで希望している三段という状態になり、
結合されなくても配置できていると思います。
このままだと最終行の文字列が中央配置のままなので、[横位置]に設定
されている[選択範囲内で中央]を[標準]などに戻します。
たぶん、これで希望していることと同じになると思います。
![「エクセル2010で、結合したセルの中に罫」の回答画像12](http://oshiete.xgoo.jp/_/bucket/oshietegoo/images/media/e/190948_56c1e0ef1761d/M.png)
ありがとうございました。できました。難点はセルの幅を変えた時に文字列が自動的には調整されないことですね。文章が完成した後にこの方法ですると良いと思いました。
No.11
- 回答日時:
No.4です。
No.8さんのお礼欄に
>文章と文章の中間に点線を引きたいのですが
とありますが、
どうしてもExcelでないとダメなのですか?
細かい体裁を整えたい場合はWordにはかなわないと思います。
Excelは表計算ソフトですので、表の細かい加工は不得手です。
どうしてもとなれば前回同様VBAになりますが、
前回のSample1を消去し、↓のコードに変更してみてください。
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
.DashStyle = msoLineDash '←追加★
.Weight = 0.5
End With
Next k
End Sub 'この行まで//
なんとかこれで破線が表示されると思います。m(_ _)m
ありがとうございます。エクセルで作られた定型文書に入力しています。VBAを使えるとなんでもできて便利そうですね。楽しいでしょうね。
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_09.png?a65a0e2)
No.8
- 回答日時:
①そのセルを右クリックする
②「セルの書式設定」を選択する
③メニュー「フォント」を選択後、サブメニューの「下線」から文字の下に引きたい線の種類を選択します。
No.6
- 回答日時:
結合したセルに罫線は引けませんので、結合していないセルの上に、問題のセルの内容を画像としてリンク貼り付けしては如何でしょう?
その操作例を下記します。
1. 同じSheetの邪魔にならない場所 または 別なSheetの任意の場所に、接合したセルをコピペして、罫線なしに設定しておきます。
(単に、そのSheetをコピーするだけでも良いと思います。)
2. セルを結合したセルの結合を解除します。
3. 「クイック アクセス ツールバー」に「カメラ」ボタンを表示します。
「カメラボタン」
http://hamachan.info/excel/kamera.html
4. 結合したセルを選択して、「カメラ」ボタンを押しますと、セルをコピーした時と同様の点滅する破線が表示され、マウスポインタが小さな十字に変化します。
5. マウスポインタを結合したセルの左上の罫線の交点に重ね、[Alt]キー押しながら、クリックしますと、画像が貼り付けされます。
6. 最後に、貼り付けられた図が貼り付けられた状態で、「図ツール」-「書式」の「図のスタイル」グループの右端にある小さな四角形(ダイアログボックス 起動ボタン)をクリックして、表示されるダイアロブボックスの左窓にある「塗りつぶし」で、「塗りつぶしなし」に、「線の色」で、「線なし」を設定して「閉じる」ボタンを押します。
(画像で隠れた罫線が見えるようになります。)
ありがとうございました。カメラがあるんですね。場面によっては便利に使えそうですね。元のセルを消去すると新たなセルも消去されてしまうので、元のセルをどこかにとっておかなければならないのが難点だと思いました。
No.5
- 回答日時:
三段とは、三行一列のセル範囲という意味ですよね。
これを結合して折り返しする方法でないと駄目ですか?
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 …
ありがとうございました。こんな方法もあるんですね。ただ例えば三行三列ですので「結合されたセルの一部を変更することはできません。」との表示が出てしまいました。
No.4
- 回答日時:
こんばんは!
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
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Windows 10 エクセルの罫線がパワポに貼り付けると見えなくなる。 3 2022/12/27 15:23
- Excel(エクセル) エクセル2016で、セル全てが消えました。 3 2023/01/03 08:27
- Excel(エクセル) 罫線の横棒の隣に文字を書きたい 5 2022/11/28 17:31
- Excel(エクセル) エクセルにおいてセル内の文字を出来るだけ大きく表示する方法を教えてください。 4 2022/07/30 08:08
- Google Drive googleスプレッドシートで文章がセルにきれいに収まらなくて困っています 2 2022/07/31 16:00
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/04/21 08:59
- Excel(エクセル) vba セルの罫線について教えてください 2 2022/12/28 17:14
- Visual Basic(VBA) 【VBA】Excelで罫線を引きたい 3 2022/07/14 12:04
- Excel(エクセル) エクセルの数式で教えてください。 2 2023/03/09 16:55
- Excel(エクセル) エクセルでA列セル内で折り返すことなく、文字列を、B列C列・・・側に一行に 2 2022/07/23 02:02
このQ&Aを見た人はこんなQ&Aも見ています
-
好きな人を振り向かせるためにしたこと
大好きな人と会話のきっかけを少しでも作りたい、意識してもらいたい…! 振り向かせるためにどんなことをしたことがありますか?
-
「これはヤバかったな」という遅刻エピソード
寝坊だったり、不測の事態だったり、いずれにしても遅刻の思い出はいつ思い出しても冷や汗をかいてしまいますよね。
-
今の日本に期待することはなんですか?
目まぐるしく、日本も世界も状況が変わる中、あなたが今の日本に期待することはなんですか?
-
AIツールの活用方法を教えて
みなさんは普段どのような場面でAIツール(ChatGPTなど)を活用していますか?
-
【お題】斜め上を行くスキー場にありがちなこと
運営も客も一流を通り越して斜め上を行くスキー場にありがちなことを教えて下さい。
-
エクセルで結合したセルに罫線を引きたい
Windows Me・NT・2000
-
【VBA】結合セルの罫線処理について
Excel(エクセル)
-
Excel 数行分セル結合したあと、結合した一番下の行を非表示にしたら、罫線が印刷されません。
Excel(エクセル)
-
-
4
EXCELのオートフィルタで罫線が表示されないのを直したい
PowerPoint(パワーポイント)
-
5
Excel で下線が消えてしまうのはどうして?
Excel(エクセル)
-
6
エクセル、空白に下線について 回答お願いいたします。画像の¥10,000の後の空白にも下線を引きたい
Excel(エクセル)
-
7
エクセル: セルの枠を超えて表示
Excel(エクセル)
-
8
エクセルのオートフィルタで罫線が消える!
Excel(エクセル)
-
9
EXCELで罫線を固定したい
Excel(エクセル)
-
10
ページを抜粋して保存できますか?
Word(ワード)
-
11
エクセルで別シートの同じ位置にオブジェクトをコピーしたい
その他(Microsoft Office)
-
12
セル結合させてるときの 条件付き書式での色づけ方法
Excel(エクセル)
-
13
Excel 2010でひとつのセル内に等間隔で直線を引くとき
Excel(エクセル)
-
14
Excelの標準機能「文字の割付」は結合セルに対しては使用不可ですが、同様の機能を結合セルに対して行
Excel(エクセル)
-
15
excel印刷で改頁をする時に罫線を引きたいのですが、良い方法ありますか?
Excel(エクセル)
-
16
EXCELの文字列操作で文字数不足の分をスペースで補う方法
Excel(エクセル)
-
17
セル内の一部の文字だけをハイパーリンクに設定したい
Excel(エクセル)
-
18
セルを結合したA4とA5の条件付き書式を結合しない行にも適用する方法を教えて下さい。
Excel(エクセル)
-
19
Wordの印刷設定をファイルごとに設定したいです
Word(ワード)
-
20
結合したセルを含む列内で、条件付き書式として塗りつぶしたい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・一番好きなみそ汁の具材は?
- ・泣きながら食べたご飯の思い出
- ・「これはヤバかったな」という遅刻エピソード
- ・初めて自分の家と他人の家が違う、と意識した時
- ・いちばん失敗した人決定戦
- ・思い出すきっかけは 音楽?におい?景色?
- ・あなたなりのストレス発散方法を教えてください!
- ・もし10億円当たったら何に使いますか?
- ・何回やってもうまくいかないことは?
- ・今年はじめたいことは?
- ・あなたの人生で一番ピンチに陥った瞬間は?
- ・初めて見た映画を教えてください!
- ・今の日本に期待することはなんですか?
- ・集中するためにやっていること
- ・テレビやラジオに出たことがある人、いますか?
- ・【お題】斜め上を行くスキー場にありがちなこと
- ・人生でいちばんスベッた瞬間
- ・コーピングについて教えてください
- ・あなたの「プチ贅沢」はなんですか?
- ・コンビニでおにぎりを買うときのスタメンはどの具?
- ・おすすめの美術館・博物館、教えてください!
- ・【お題】大変な警告
- ・洋服何着持ってますか?
- ・みんなの【マイ・ベスト積読2024】を教えてください。
- ・「これいらなくない?」という慣習、教えてください
- ・今から楽しみな予定はありますか?
- ・AIツールの活用方法を教えて
- ・最強の防寒、あったか術を教えてください!
- ・歳とったな〜〜と思ったことは?
- ・モテ期を経験した方いらっしゃいますか?
- ・好きな人を振り向かせるためにしたこと
- ・スマホに会話を聞かれているな!?と思ったことありますか?
- ・それもChatGPT!?と驚いた使用方法を教えてください
- ・見学に行くとしたら【天国】と【地獄】どっち?
- ・これまでで一番「情けなかったとき」はいつですか?
- ・この人頭いいなと思ったエピソード
- ・あなたの「必」の書き順を教えてください
- ・14歳の自分に衝撃の事実を告げてください
- ・人生最悪の忘れ物
- ・あなたの習慣について教えてください!!
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
セル入力文字が、「右のセルに...
-
Excelのセル内の文字の頭に半角...
-
エクセルで知らない間に行がず...
-
エクセルでセルの中の文字が削...
-
あるセルに色を付けた時、別の...
-
エクセルの一つのセル内に2つの...
-
WORDで表の行を2行に分けたい
-
Wordで、表のセルが変なところ...
-
エクセル 結合したセルの間にセ...
-
エクセル2010で、結合したセル...
-
Excelで1部印刷する毎に連番を2...
-
Excelで「折り返して全体を表示...
-
Wordでセルに文字を入力すると...
-
Wordの表で逆L字型のセルを作成...
-
Word 表のセルを結合せずに文字...
-
エクセルで複数行を括弧でくく...
-
エクセルで1列おきのデータのみ...
-
ピボットで作成した表は、セル...
-
Wordの表をExcelの表に貼り付ける
-
Word 表のセル塗りつぶし
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
セル入力文字が、「右のセルに...
-
エクセルで知らない間に行がず...
-
あるセルに色を付けた時、別の...
-
エクセルでセルの中の文字が削...
-
Excelのセル内の文字の頭に半角...
-
エクセルの一つのセル内に2つの...
-
Wordで、表のセルが変なところ...
-
エクセル 結合したセルの間にセ...
-
エクセル2010で、結合したセル...
-
WORDで表の行を2行に分けたい
-
Wordでセルに文字を入力すると...
-
ピボットで作成した表は、セル...
-
エクセルで1列おきのデータのみ...
-
Wordの表で逆L字型のセルを作成...
-
ワードで表を作ってセル内で改...
-
Excelで「折り返して全体を表示...
-
Word 表のセルを結合せずに文字...
-
Word 表のセル塗りつぶし
-
Wordで天地(上下)が同じ中に...
-
用紙を均等に分割して文書は作...
おすすめ情報
皆さんありがとうございます。例えばの「三段」は「三行三列」のことです。説明不足で申し分けありません。
皆さんありがとうございました。色んな方法を学習させて頂きました。VBAがパーフェクトでとても良かったんですが、私にはVBAは使えなくて残念でした。