マクロで・・・

複雑な罫線を引きたいのですが、うまくいきません。ある表があって、罫線の種類や大きさをいろいろと変更しないといけなくなって、それが何枚もあるもので・・・使用するセルは全部同じ大きさです。うまく説明ができていないかもしれませんが、よろしくお願いします。

No.1 回答者： Batistuta 回答日時： 2005/04/12 11:52

ahorikiさんが初心者さんだと仮定して。

もしご存知でしたらすみません。

１．線を引きたい場所を範囲選択
２．右クリック
３．セルの書式設定を選択
４．罫線タブを選択
５．太さや線種を選択
６．線を引きたい場所をクリック

これで自在に線を引く事ができます。
複雑な線を引くのにこれ以上に楽な方法は・・・多分無いんじゃないかと。

この回答への補足

初心者です。説明不足ですみません。。。１つのシートの中に同じ表がたくさんあって、全部同じように変更しなくてはなりません。上記のようにしてみましたが、設定したその分しかかわりません。

補足日時：2005/04/12 13:03

No.2 回答者： big_fool 回答日時： 2005/04/12 12:09

Excelと仮定して

Borderオブジェクト
Bordersコレクション
BorderAroundメゾットなどがありますが一度ヘルプで確認してみてください。
具体的にどのように罫線を引きたいかを教えていただけるともう少し参考になる回答も出来るかも知れません。

この回答へのお礼

Borderオブジェクト他の意味がよくわかりませんが、他の方法があることがわかりました！
ありがとうございました。でも、マクロでだったらどうしたら、いいでしょうか・・・？ちょっと気になって・・・

お礼日時：2005/04/12 13:26

No.3 回答者： BLUEPIXY 回答日時： 2005/04/12 14:48

>１つのシートの中に同じ表がたくさんあって、全部同じように変更しなくてはなりません

同じ書式なら、ツールバーの中にあるブラシの絵のボタン（書式のコピー／貼り付け）を使うのが簡単です。
１．書式をコピーしたい（元の）範囲を指定してから
ブラシボタンをダブルクリック（ダブルクリックすると連続適用できます）します。
２．書式を適用したい左上隅のセルをクリックします。（書式が同じ範囲で適用されます）
３．連続して、同じ形式の別の部分を適用します。
４．ＥＳＣキーを押して、連続適用を解除します。

No.4 回答者： Batistuta 回答日時： 2005/04/13 13:55

　No.1です。

すみません。質問を勘違いしていたようです。

　マクロにこだわらないのであれば、BLUEPIXYさんの方法がオススメです。
　マクロでしなければならない理由があるのであれば、ちょっと基礎知識を付ける必要があります。マクロ記述の方法は以下のとおり。

　１．マクロの記録を開始。
　２．表を一つ作成します。
　３．マクロの記録終了。
　４．Alt+F11でVBA Editorを呼び出す
　５．左ペインにある標準モジュール→Module1をクリック
　６．他の部分も罫線を引くように記述を変更
　　　（Sub～EndSubの中の文を書き換えます）

但し、上にも書きましたが６をやるにはVBA言語をそこそこ理解している必要があります。

　どのような線を引くかによって記述が変わりますので、私がここで提示する事はできません。
ヒントはFor～Next文とCells()です。