【エクセルマクロ】ダブルクリックで列を削除する:簡単解説

エクセルマクロ_ダブルクリックで列を削除_アイキャッチ エクセルマクロで効率化する

エクセルマクロで、ダブルクリックで列を削除するVBAコードをご紹介します。
 


 

※一度マクロを実行すると、
「戻る」ボタンを押してもマクロ実行前の状態に戻すことはできませんので、ご注意ください。

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

ダブルクリックで列を削除する

以下のExcelVBAを実行すると、ダブルクリックした列を削除します。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  
    With Target
      
        Columns(Target.Column).Delete Shift:=xlToLeft
  
        Cancel = True
  
    End With
  
End Sub

 
 

特定の行をダブルクリックしたときのみマクロを実行したい時は?

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

[If .Row = 1 Then] は、1行目をダブルクリックしたときのみ、

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

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  
    With Target
    
        If .Row = 1 Then
        
          Columns(Target.Column).Delete Shift:=xlToLeft
    
          Cancel = True
        
        End If
  
    End With
  
End Sub

 

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