書式 EXCEL&VBA

エクセルで罫線のみコピーする方法

エクセルを使っていると、表のレイアウトを維持しながら、罫線のみをコピーしたい場面があると思います。

しかし、通常のコピー&ペーストでは、セルの値や書式までコピーされてしまいます。
本記事では、「エクセル」で「罫線のみコピー」する方法を詳しく解説します。



罫線のみコピーする方法

エクセルで罫線のみコピーするには、以下の手順を実行します。

方法1:形式を選択して貼り付け

1. 罫線をコピーしたい範囲を選択します。
2. `Ctrl + C` を押してコピーします。
3. 罫線を適用したいセル範囲を選択します。
4. `Ctrl + Alt + V` を押して「形式を選択して貼り付け」ダイアログを開きます。
5. 「書式」を選択し、「OK」をクリックします。

この方法では、罫線だけでなくフォントやセルの色もコピーされるため、必要に応じて追加の調整が必要です。

方法2:セルの書式のみコピー(ペイントブラシを使用)

1. 罫線をコピーしたいセルを選択します。
2. エクセルの「ホーム」タブにある「書式のコピー/貼り付け」(ペイントブラシのアイコン)をクリックします。
3. 罫線を適用したいセル範囲をドラッグします。

この方法では、罫線だけでなくフォントやセルの背景色もコピーされるため、不要な部分があれば手動で調整が必要です。

方法3:VBAを使用して罫線のみコピー

VBAを使えば、罫線のみを簡単にコピーできます。
以下のコードをエクセルのVBAエディタに貼り付けて実行してください。

Sub CopyBordersOnly( )
__Dim sourceRange As Range, targetRange As Range
__Set sourceRange = Selection
__Set targetRange = Application.InputBox("罫線を貼り付ける範囲を選択してください", Type:=8)
_
__Dim borderIndex As XlBordersIndex
__For Each borderIndex In Array(xlEdgeLeft, xlEdgeTop, xlEdgeBottom, xlEdgeRight, xlInsideVertical, xlInsideHorizontal)
____targetRange.Borders(borderIndex).LineStyle = sourceRange.Borders(borderIndex).LineStyle
____targetRange.Borders(borderIndex).Weight = sourceRange.Borders(borderIndex).Weight
____targetRange.Borders(borderIndex).Color = sourceRange.Borders(borderIndex).Color
__Next borderIndex
End Sub

このVBAを使うと、罫線のみを選択範囲にコピーできます。

まとめ

エクセルで罫線のみコピーする方法として、「形式を選択して貼り付け」「書式のコピー/貼り付け」「VBAを使用する」3つの方法を紹介しました。

シンプルな方法で十分な場合は「形式を選択して貼り付け」や「書式のコピー/貼り付け」を使用し、より正確に罫線のみをコピーしたい場合はVBAを活用するとよいでしょう。
これで、エクセルで罫線のみをコピーする方法をマスターできます!

関連記事・広告






-書式, EXCEL&VBA
-,