Uncheck all checkboxes across entire workbook via CommandButton

by

This code iterates through all sheets (except sheets named Sheet100 and OtherSheet) and unchecks all your ActiveX checkboxes named CheckBox1

Sub uncheck_boxes()

    Dim ws As Worksheet
    Dim xbox As OLEObject
    For Each ws In ThisWorkbook.Worksheets
        If ws.Name <> "Sheet100" And ws.Name <> "OtherSheet" Then
            For Each xbox In ws.OLEObjects
                ws.OLEObjects("CheckBox1").Object.Value = False
            Next
        End If
    Next
End Sub

To uncheck all ActiveX checkboxes in all sheets disregarding the names used

Sub uncheck_all_ActiveX_checkboxes()

    Dim ws As Worksheet
    Dim xbox As OLEObject
    For Each ws In ThisWorkbook.Worksheets
        For Each xbox In ws.OLEObjects
            ws.OLEObjects(xbox.Name).Object.Value = False
        Next
    Next
End Sub

To uncheck all Form Control checkboxes on a spreadsheet use

Sub uncheck_forms_checkboxes()

    Dim ws As Worksheet
    Dim xshape As Shape
    For Each ws In ThisWorkbook.Worksheets
        For Each xshape In ws.Shapes
            If xshape.Type = msoFormControl Then
                xshape.ControlFormat.Value = False
            End If
        Next
    Next
End Sub

More Related Contents:

  1. Checking if a worksheet-based checkbox is checked
  2. Sequence of numbers based on start and end value of 2 cells [closed]
  3. Function to convert column number to letter?
  4. Read/Parse text file line by line in VBA
  5. Better way to find last used row
  6. Excel VBA: Answer gets “stuck”
  7. 2 Dimensional array from range [closed]
  8. filter out multiple criteria using excel vba
  9. Excel VBA autofilter all but three
  10. Cells.Find() Raises “Runtime Error 91: Object Variable or With Block Not Set”
  11. Using Google Chrome in Selenium VBA (Installation Steps)
  12. Dir() function not working in Mac Excel 2011 VBA
  13. Excel VBA code to copy a specific string to clipboard
  14. How to use workbook.saveas with automatic Overwrite
  15. Range limit conundrum
  16. How do you run a .exe with parameters using vba’s shell()?
  17. How to use FindWindow to find a visible or invisible window with a partial name in VBA
  18. How do you get a Range to return its Name?
  19. Passing variable from Form to Module in VBA
  20. Excel VBA: Convert a date string to a Unix timestamp
  21. If string contains word from list, return value adjacent to list value
  22. Refreshing all the pivot tables in my excel workbook with a macro
  23. Countif With Multiple OR Criteria
  24. Vlookup to copy color of a cell
  25. excel vba freeze pane without select
  26. How to delete rows in Excel based on criteria using VBA?
  27. Converting a string representation of a constant into a constant?
  28. Macro to export MS Word tables to Excel sheets
  29. VBA WinHTTP to download file from password proteced https website
  30. How to protect Excel workbook using VBA?

Leave a Comment