トップ > テクニカルディスカッション >Magic V9/V9Plus >EXCELの罫線

Re: EXCELの罫線

このトピックの投稿一覧へ

Re: EXCELの罫線

msg# 1.2

depth:: 1

前の投稿 - 次の投稿 | 親投稿 - 子投稿.1 | 投稿日時 2008-2-18 21:29

muka

居住地: 東京都練馬区投稿数: 69

　マクロを記録してみて、それをＶＢエディタで見ると、どうすればいいのかが見えてくると思いますよ。
　例えば該当部分を抜くと下記のようになります。

 With Selection.Borders(xlEdgeTop)
  .LineStyle = xlContinuous
  .Weight = xlThin
  .ColorIndex = xlAutomatic
 End With

　「Selection.Borders(xlEdgeTop)」というのが上部の罫線で、これに対して「Weight」値をセットしてあげれば罫線は引けます。

　これをＭＡＧＩＣのＣＯＭでやるためには、「Borders」というオブジェクトが必要になるので、新しく変数を用意し、エクセルのオブジェクトの「Borders」に割り当てます。
　次に、該当セルがセットされたオブジェクトの「Range」のプロパティ「Borders.Item」のプロパティ値を、戻り値（新しく定義した「Borders」）で取得します。このとき、パラメータの「Index」には、「xlEdgeTop」の値：８（オブジェクトブラウザ等で確認）を指定します。

　あとは、プロパティの設定で「Borders」オブジェクトに対して「Weit」値（xlThinなら２）を指定してあげればＯＫです。

--
向井田　浩司（むかいだ　ひろし）
-------------------------------------------------------
株式会社エターナルデザイン
E-mail: muka@eternaldesign.jp
Web: http://www.eternaldesign.jp
-------------------------------------------------------

投票数:2 平均点:10.00

投稿ツリー

EXCELの罫線 (CLINEYOKO, 2008-2-16 14:18)
- Re: EXCELの罫線 (ISHIJIMA, 2008-2-18 13:21)
- Re: EXCELの罫線 (muka, 2008-2-18 21:29)
  - Re: EXCELの罫線 (CLINEYOKO, 2008-2-19 9:32)