【VBA】特定の名前のシートを高速に背景色を変える方法

手作業で大量のデータの背景色を変更するのは時間がかかります。この記事では、特定のシート名を持つワークシートの背景色を一括で変更するVBAマクロを作成します。高速処理と画面更新停止機能により、業務効率が大幅に向上します。

サンプルコード

VBA

Option Explicit
Sub ChangeSheetBackgroundColor()
    ' 特定の名前のシートの背景色を変える
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("指定シート名")
    
    With ws
        .Cells.Interior.ColorIndex = 6 ' 背景色を青に変更 (ColorIndex: 1=赤, 3=緑, 4=青...)
    End With
    
End Sub

よくある質問

Q 元に戻せますか？

VBAの実行結果は「元に戻す」が効きません。必ずバックアップを取ってから実行してください。

Q エラーが出たら？

シート名や列番号が正しいか確認してください。