VBA~シートの枠線の色を変更しよう~Excel
VBAでセルの枠線の色を変更したい場合はWindow.GridlineColorIndexプロパティまたはWindow.GridlineColorプロパティを設定します。
Window.GridlineColorIndexプロパティ
Window.GridlineColorIndexプロパティでは枠線の色はカラーパレットのインデックス番号で設定します。
下のコードを実行すると枠線の色が赤になります。
Sub test1() ActiveWindow.GridlineColorIndex = 3 End Sub
Window.GridlineColorプロパティ
Window.GridlineColorプロパティでは枠線の色はRGB関数で設定します。
下のコードを実行すると枠線の色が赤になります。
Sub test2() ActiveWindow.GridlineColor = RGB(255, 0, 0) End Sub
枠線の色を標準に戻す
枠線の色を標準に戻したい場合はWindow.GridlineColorIndexプロパティをxlColorIndexAutomaticに設定します。
下のコードを実行すると枠線の色が標準になります。
Sub test3() ActiveWindow.GridlineColorIndex = xlColorIndexAutomatic End Sub
指定したシートの枠線の色を変更する
指定したシートの枠線の色を変更したい場合は、まず枠線の色を変更したいシートをアクティブにします。
下のコードを実行するとSheet2の枠線の色が赤になります。
Sub test4() Worksheets("Sheet2").Activate ActiveWindow.GridlineColor = RGB(255, 0, 0) End Sub
ブックを指定して枠線の色を変更する
ブックを指定して枠線の色を変更したい場合は、まず枠線の色を変更したいブックのシートをアクティブにします。
Book1.xlsxというブックが開いた状態で下のコードを実行するとBook1.xlsxのSheet1の枠線の色が赤になります。
Sub test5() Workbooks("Book1.xlsx").Worksheets("Sheet1").Activate ActiveWindow.GridlineColor = RGB(255, 0, 0) End Sub