【EXCEL VBA】コピペでぐちゃぐちゃになった罫線を一発で直す

EXCELで分類表などを作っていて、コピペにコピペを重ねたときに罫線がぐちゃぐちゃになったことありません?
それを手作業で直すと地味に時間が掛かってしまいます。
そこで、VBAを使って簡単に修正するテクニックをご紹介します。
できること
左のような罫線がぐちゃぐちゃになった表を、マクロを実行することで、右のように整えることができます。
VBAコード
'分類表の横線を修正 Sub 罫線_横_リビルド() For i = 1 To Selection.Count If i / Selection.Columns.Count > 0 Then '2行目以降を判定 If Selection(i).Text = "" Then Selection(i).Borders(xlEdgeTop).LineStyle = xlNone Else Selection(i).Borders(xlEdgeTop).LineStyle = xlContinuous End If End If Next i End Sub
使い方
修正したい罫線を含むセルを選択し、マクロを実行すればOKです。
ディスカッション
コメント一覧
まだ、コメントがありません