【エクセルマクロ】ダブルクリックで行の色を変更：効率UPの方法

エクセルマクロで、ダブルクリックで行に色付けするVBAコードをご紹介します。

作業状況を見分けるときなど、行を塗りつぶしすることはありませんか？
VBAを組んでおくと、行の色付けが自動で素早くできます。

このページのマクロコードは、コピペで使えます。
せひ、お試しください。
 

ダブルクリックで行の色を変更する

以下のExcelVBAを実行すると、ダブルクリックした行の背景色を黄色に変更します。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

    With Target
        Rows(Target.Row).Interior.Color = 65535
        Cancel = True
    End With

End Sub

マクロ実行後

下記コードのように、IF文を追加します。

[If .Column = 1 Then] は、1列目（A列）をダブルクリックしたときのみ、

マクロが実行されるように設定しています。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

    With Target
        If .Column = 1 Then
            Rows(Target.Row).Interior.Color = 65535
            Cancel = True
        End If
    End With

End Sub

 
この記事がお役に立ちますと幸いです。
 

【エクセルマクロ】ダブルクリックで処理を実行：超便利18選

...

kirinote.com

2021.06.16