[[20150412161209]]　『データが入っているセルの横のセルに罫線』（ニワ）　ページの最後に飛ぶ

『データが入っているセルの横のセルに罫線』（ニワ）

 またお教え願います。
 C1～C5セルにデータが入力されているとします。
 そうしたら、C1～C5セルの右横のD1～D5
セルの外枠に罫線を引く
ということをマクロでやりたいのですが、いかがでしょうか。
 データが入力されているセルは、C1～C10などのように変動します。
 その度に、D1～D10のセルに罫線を引くなどのようにD列の罫線を引くセルも変動させたいです。
よろしくお願いいたします。

＜使用 Excel：Excel2013、使用 OS：Windows8 ＞

 条件付き書式ではまずいでしょうか。
http://allabout.co.jp/gm/gc/297742/2/　　データが入力された行だけ罫線を引く

（Mook） 2015/04/12(日) 18:02

 ありがとうございます。
 試してみましたが、うまくできないので、ＶＢＡでやる方法をお教え願います。
（ニワ） 2015/04/13(月) 11:35

C1からデータが存在するのでしょうか？
データは連続しているのでしょうか？

（コヨーテひな） 2015/04/13(月) 11:46

    Range("D1", Cells(Rows.Count, "C").End(xlUp).Offset(, 1)).Borders.LineStyle = xlContinuous
（???） 2015/04/13(月) 11:58

それとも、セルの外枠ということだから、こう？

    With Range("D1", Cells(Rows.Count, "C").End(xlUp).Offset(, 1))
        .Borders.LineStyle = xlContinuous
        .Borders(xlInsideHorizontal).LineStyle = xlLineStyleNone
    End With
（???） 2015/04/13(月) 12:00

 できました。
 ありがとうございました。
（ニワ） 2015/04/13(月) 18:09

コメント返信：

[ 一覧(最新更新順) ]

[[20150412161209]] 『データが入っているセルの横のセルに罫線』（ニワ） ページの最後に飛ぶ

[[20150412161209]]　『データが入っているセルの横のセルに罫線』（ニワ）　ページの最後に飛ぶ