- ベストアンサー
Excel : 罫線の設定パターン
- みんなの回答 (5)
- 専門家の回答
質問者が選んだベストアンサー
下のようなVBAになると思います。 セルを1つだけ選択すると、メッセージボックスが出て、 2つ以上のセルを選択するよう警告し、 外枠の罫線設定のみ反映されます。 ここから--------------------------- Sub kei() ' セル範囲の内側のタテヨコに罫線を引きます Dim arow As Integer, acolumn As Integer arow = Selection.Rows.Count acolumn = Selection.Columns.Count If arow + acolumn = 2 Then MsgBox "2つ以上のセルを選択して下さい", vbExclamation '1つのセルを選択した場合、内部がないのでメッセージボックスで警告します ElseIf arow = 1 Then '列が1列しかない場合 With Selection.Borders(xlInsideVertical) .LineStyle = xlContinuous .Weight = xlThin '線の太さ End With ElseIf acolumn = 1 Then '行が1行しかない場合 With Selection.Borders(xlInsideHorizontal) .LineStyle = xlContinuous .Weight = xlThin '線の太さ End With Else With Selection.Borders(xlInsideVertical) .LineStyle = xlContinuous .Weight = xlThin '線の太さ End With With Selection.Borders(xlInsideHorizontal) .LineStyle = xlContinuous .Weight = xlThin '線の太さ End With End If ' セル範囲の外枠に罫線を引きます With Selection.Borders(xlEdgeTop) .LineStyle = xlContinuous .Weight = xlMedium '線の太さ End With With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .Weight = xlMedium '線の太さ End With With Selection.Borders(xlEdgeLeft) .LineStyle = xlContinuous .Weight = xlMedium '線の太さ End With With Selection.Borders(xlEdgeRight) .LineStyle = xlContinuous .Weight = xlMedium '線の太さ End With End Sub ----------------------ここまで 線の太さを変えたい場合は、「'線の太さ」と注釈のある ところで「xlMedium」等を変更してください。 これらの表記については、下記HP等を参考にしてください。
その他の回答 (4)
- moon00
- ベストアンサー率44% (315/712)
おそらくzuntacさんのお望み通りにするには、VBAを使用するしか 手はないように思います。 2003でもおそらくVBAでしか無理だと思います。 今あるアイコンの配置をカスタマイズするのではなくて、 一度で希望の罫線がかけるアイコンを作成したいのですよね。 VBAでよければ、参考例を出すことが可能ですが。
お礼
回答ありがとうございます。おっしゃる通り、現在のExcellにはこのような機能は無いようです。お手数ですが罫線のマクロの参考例を教えていただけますでしょうか。ツールバーの[ユーザー設定]の「新しいメニュー」に作成したVBAマクロを貼り付けたいと思います。よろしくお願いします。
- sakeman
- ベストアンサー率43% (67/153)
→[ユーザー設定]→[コマンド]タブ→[コマンド配置の変更]ボタンです。 [コマンド]欄の下、[選択したボタンの編集]ボタンの右側にあります。 当方はExcel2003ですので、確認できず悪しからず。
お礼
補足、ありがとうございます。しかし、[コマンド配置の変更]ボタンがexcell 2002 では見つかりません。
- sakeman
- ベストアンサー率43% (67/153)
Excel2003では12のパターンだと思います。 罫線ツールバーに罫線のパターンを追加するには、 ツールバーを右クリック→[ユーザー設定]→[コマント]タブ→[分類]→[書式]を選択→[コマンド]欄で必要な罫線のボタンをクリックし、罫線ツールバーまでドラッグ&ドロップする→これでツールバー中に登録されます。 罫線のパターンを削除・整理するには、 ツールバーを右クリック→[ユーザー設定]→[コマンド]タブ→[コマンド配置の変更]をクリック→[ツールバー]をクリックし選択→[書式設定/罫線]を選択→[コントロール]欄で編集するボタンを選択→[削除]または、[上へ],[下へ]ボタンをクリックする。→[閉じる]→[閉じる] これでお望みのようになると思いますが、質問の趣旨と異なっていれば悪しからず。
お礼
回答ありがとうございます。[ユーザー設定]ダイアログの中の[コマンド]タブをクリックしましたが、[コマンド配置の変更]という項目が見つかりません。これはボタンでしょうか。あるいは「分類」あるいは「コマンド」のエディットリスト中の項目でしょうか。使っているのがExcel 2002 SP3なので2003とは違っているのかもしれません。設定できないのなら、VBAでやるしかないのかもしれません。
- imogasi
- ベストアンサー率27% (4737/17068)
問題の意味がよく読めないのですが 下記の操作のこと(みな当たり前に使っていること) ではないですか。 たとえば F9:I17範囲指定 書式-セル-罫線 線のスタイルボックスの中の太線をクリック 「田」の字のような「外枠」をクリック 線のスタイルの細線をクリック +字の縦横線をそれぞれクリック。+部分は細線になる これでOKすると、F9:F17、F9:I9など の外枠は太線、中のセルは細線になります。 これではだめですか。 これでは平凡すぎる質問なので、私は捨石回答になります。ダメなむね答えていただければ後の回答者の参考になるでしょう。
お礼
回答ありがとうございます。 やりたいのは、選択した範囲に対して、一発で所望の罫線パターンを設定することです。そのために「書式設定ツールバー」上の「罫線」のプリセットパターンを編集したいというのが質問の主旨です。
関連するQ&A
- エクセルの罫線とパターンについて
お世話になります。 エクセルであるセルの書式設定のパターンで着色すると、罫線まで着色されます。罫線の設定を着色したセルでは無く、隣のセルに行ったりしてみましたが、同一の現象となります。罫線が着色されない方法があれば教えて頂けないでしょうか?尚、罫線は二重線を使用しています。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excelに初期設定されている罫線の太さを細くするには?
Excelの罫線ボタンで引ける線は2種類ですが、細い方を選んでも上司には気に入られず、「太い」といわれます。そこで表を作るたびに 「メニューバー」→「書式」→「セル」の手順で線を引かなくてはなりません。 Excelの初期設定を変更して、ツールバーの罫線ボタンをクリックしただけで一番細い線が引けるようにはできないでしょうか? よろしくおねがいいたします。
- ベストアンサー
- オフィス系ソフト
- エクセルの罫線について
お世話になります。 エクセルでセルの書式設定のパターンで白を選択すると、 もともと表示されていた罫線が消えて真っ白になって しまうのですが、これを元の罫線を表示させるには どうしたらいいでしょうか? よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- EXCELでの罫線について
罫線の色を変えたいのですが、セルの書式設定から罫線の色を変えても、実行されません。 図形描画のツールバーから線の色の横の下矢印をクリックしても、色を選択できるところが全て色がついておらず選択できません。 教えてください。EXCEL2000です。
- ベストアンサー
- オフィス系ソフト
- Excelの条件付き書式設定の太い罫線
Excel 2000 です。 条件付き書式の「書式」ボタンを押して表示される「セルの書式設定」の罫線タブの「線」の「スタイル」には、太い線がありません。 条件付き書式では、太い罫線は設定できないということでしょうか。
- ベストアンサー
- オフィス系ソフト
- Excel 2013 で簡易罫線選択メニュー?
添付図は Excel 2002 の[ツールバー]上の一つ[罫線]をクリックして現れた罫線メニューを示しています。詳細な設定は、Excel 2013 と同様に[セルの書式設定]から行なえるのですが、私はツールバーのもので殆どの場合事足りていました。 Excel 2013 でも Excel 2002 と同様に数種類の罫線を出せる設定方法があれば、その手順を教えてください。
- ベストアンサー
- Excel(エクセル)
- EXCELで罫線が引かれてるのに、見えない!!
タイトルには十分に書ききれなかったので「オッ!?」と思ってくださった方 ありがとうございます。 実は、他人が作った見積シートを修正していたのですが、行をコピーして コピーしたセルの挿入したら、罫線が消えてしまったんです。 罫線を引く時って、普通セル範囲を指定して、セルの書式設定で引きますよね? でも、今引かれてる罫線はセルの書式設定の罫線で見ても空欄になってるのです。 ???なんで? この会社の人達は、なぜか罫線引く時に、矢印のとなりにある線で引くので めちゃ職人技のような罫線を引いていることが多々見受けられるのですが、 今修正してるシートは、その線、矢印、オートシェイプなどもグレイアウトしてて 使えません・・・。(他のシート=Bookでは使えます) これまで、縦の合計くらいしか出したことのない私です、補足もしますので 何かヒントを教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセル2000で罫線が表示されない・・・
エクセル2000の罫線、矢印について質問です。 ツールバーの図形描画で斜めの罫線や矢印を書いているのですが、突然罫線、矢印が表示されなくなりました。 原因を探していますがいまいち分かりません。 ドラッグして線をひくと、線は表示されませんが、始点と終点には小さな四角がでてきます。そこをダブルクリックするとオートシェイプの書式設定が表示され、線:色の部分には「線なし」と表示しています。その「線なし」が原因と思うのですが、変更できません。 詳しい方、ご教授下さい。
- ベストアンサー
- オフィス系ソフト
- エクセルで罫線の太さを変更
カードサイズの用紙に列や行が多目の表を作っています。 文字はフォントを小さくすれば大丈夫なんですが、罫線が太すぎて非常に見にくいです。(ツールバーの罫線で細い方の線を使っています。)A4などの用紙で印刷する時と同じ太さで印刷されているようです。 オートシェイプで枠を作ると書式設定で線の太さを細かく設定できますが、罫線の太さは設定できないのでしょうか?
- ベストアンサー
- オフィス系ソフト
- word2002 罫線の種類の「グリッド」について
「線種とページ罫線と網掛けの設定」ダイアログの中の罫線タブの中に種類として「グリッド」とあります。 ポップヒントのヘルプを確認すると 「選択部分の周囲に罫線を挿入し、罫線に3-Dの書式を設定します。この罫線は“窓”や“写真のフレーム”のようなものです。線の種類や網掛けの書式を設定する対象を「設定対象」ボックスで選択します。 となっていました。 この意味もまずわかりません。 どういうときに利用できるのでしょうか? また、現在、点線で格子線がひかれているときに、外側を二重線の「グリッド」を設定したところ、外側は二重線になったのですが、中の罫線も通常の罫線になってしまいました。 私のイメージとしては、外側の罫線だけを変更する・・・という考えだったのですが、違うのですね。 よろしくお願いします。
- 締切済み
- オフィス系ソフト
お礼
VBAの作成、ありがとうございます。さっそく、ツールバーに仕込みました。一発で所望の罫線パターンに設定できるようになりました。