【エクセルマクロ】チェックボックスを削除する:4つの使用列を紹介するよ

エクセルマクロ_チェックボックス一括削除_アイキャッチ エクセルマクロで効率化する

エクセルマクロで、チェックボックスを削除するVBAコードをご紹介します。

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

チェックボックスを削除

以下のExcelVBAを実行すると、アクティブシート内にあるすべてのチェックボックスを削除します。

Sub チェックボックス一括削除()

    Dim checkbox As checkbox

    For Each checkbox In ActiveSheet.CheckBoxes
        checkbox.Delete
    Next

End Sub

 

マクロ実行後

チェックボックスを一括で自動消去します。


 
 

チェックボックスを削除(特定範囲)

以下のExcelVBAを実行すると、特定範囲内にあるチェックボックスを消去します。

Sub チェックボックスを消す()

Dim cb As checkbox
    
 For Each cb In ActiveSheet.CheckBoxes
    
   If Not Application.Intersect(cb.TopLeftCell, ActiveSheet.Range("A2:A4")) Is Nothing Then
     cb.Delete
   End If
    
 Next cb

End Sub

 

マクロ実行後

セル範囲 [A2:A4] の中にあるチェックボックスを消します。


 

チェックボックスを削除(特定列)

以下のExcelVBAを実行すると、特定の列にあるチェックボックスを削除します。

Sub 特定列のチェックボックスを消す()
 
Dim cb As checkbox
     
    For Each cb In ActiveSheet.CheckBoxes
    
       If cb.TopLeftCell.Column = 2 Then
            cb.Delete
        End If
          
    Next cb
 
End Sub

 

マクロ実行後

B列にあるチェックボックスを消去します。


 

チェックボックスを削除(特定行)

以下のExcelVBAを実行すると、特定の行にあるチェックボックスをクリアします。

Sub 特定行のチェックボックスを消す()
 
Dim cb As checkbox
     
    For Each cb In ActiveSheet.CheckBoxes

        If cb.TopLeftCell.Row = 2 Or cb.TopLeftCell.Row = 4 Then
            cb.Delete
        End If
          
    Next cb
 
End Sub

 

マクロ実行後

2行目と4行目にあるチェックボックスを消去します。

 
 

【エクセルマクロ】チェックボックスのチェックを一括解除:コピペで使えるコード
...