ユーザー定義で追加した下二重罫線が正しく設定されない

Question

Excel2003 SP3において、ユーザー定義で下二重罫線を追加した後、

シート上でユーザー定義で作成した下二重罫線ボタンを押下したのですが、

なぜか、通常の罫線が表示されてしまいます。

「罫線」ツールバーの「線のスタイル」を、「罫線なし」に設定した後、

下二重罫線ボタンを押下すると、下二重罫線が表示されます。

「罫線」ツールバーの「線のスタイル」を任意の線種に設定した後、

下二重罫線ボタンを押下すると、「線のスタイル」で設定した線種が表示されます。

どうやら、「線のスタイル」で設定した線種を表示しているようです。

毎回、「線のスタイル」の設定を確認してから

下二重罫線ボタンを押下しなければいけないのは不便です。

対処方法はないのでしょうか。

Answer 1

おっしゃっている意味わかりました。

全体の仕様としてはおしゃるとおり、線のスタイルで線種を決め、罫線を引くと言うことなんだと思います。

しかし、下二重線と言うボタンが提供されているのに機能しないというのはバグくさいですね。

と言うことで、普通の方法としては、書式ツールバーの罫線ボタンからやるということぐらいしかなさそうです。

もし、マクロでも良いなら

Sub DoubleLine()

    With Selection.Borders(xlEdgeBottom)

        .LineStyle = xlDouble

        .Weight = xlThick

        .ColorIndex = xlAutomatic

    End With

End Sub

となります。

もし、特定のブックではなくいつも使うということであれば、これを個人用マクロブック（Personal.xls)の標準モジュールに入れ、このマクロを呼び出すボタンをツールバーに入れちゃえば良いとおもいます。

とりあえず、特定のブックで試されるなら、

１．ALT+F11でVBEを立ち上げ

２．挿入⇒標準モジュール

３．表示されたコードエリアに上のコードをコピー＆ペースト

４．VBEを閉じ、ALT＋F8でマクロダイアローグを出しDoubleLineを実行

Answer 2

マクロをツールバーに登録してできました。

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

Answer 3

>>シート上でユーザー定義で作成した下二重罫線ボタンを押下したのですが、

>意味が良くわかりません。

>どのような手順でどのようなボタンを作られたのでしょうか？

>もし、VBAのコードを作成されたのでしたらそれも提示願います。

意図が伝わらなく申し訳ありません。

（ボタンと書いたことがいけなかったと反省しております）

作成手順

　１．Excel起動後、プルダウンメニューの「表示」→「ツールバー」→「ユーザー設定」を選択。

　２．「ツールバー」タグを選択。

　３．「新規作成」ボタンを押下し、ツールバー名を任意文字（"罫線２"等）を入力し「OK」ボタンを押下。

　４．「コマンド」タグを選択。

　５．分類内にある「書式」から、「下二重罫線」を作成したツールバーにドラッグ。

　６．分類内にある「書式」から、「線のスタイル」を作成したツールバーにドラッグ。

　７．「閉じる」ボタンを押下。

Answer 4

>シート上でユーザー定義で作成した下二重罫線ボタンを押下したのですが、

意味が良くわかりません。

どのような手順でどのようなボタンを作られたのでしょうか？

もし、VBAのコードを作成されたのでしたらそれも提示願います。