VBA 斜め線を設定する

VBA 斜め線を設定する

VBAで、斜め線を設定するコードを記述してます。

環境

  • OS windows10 64bit

斜め線を設定する

斜め線を設定するには、「Borders(xlDiagonalUp).LineStyle」を使用します。

適当なボタンを用意して、指定したセルに左下と右下方向の斜めをつける以下のソースコードを記述します。

Private Sub CommandButton1_Click()

    ' 左下斜め線
    Cells(2, 2).Borders(xlDiagonalUp).LineStyle = xlContinuous
    ' 右下斜め線
    Cells(2, 3).Borders(xlDiagonalDown).LineStyle = xlContinuous
    
End Sub

実行してみます。

設定できていることが確認できます。