Ну что значит "не силен"? Вы на форум решили исключительно за готовыми решениями ходить?
Не очень правильно. Форумы для помощи в освоении Excel и VBA, а не для решалок каждому, кто "не силен" задач с нуля. Поднапрягитесь, поищите что такое циклы в VBA. А то так и будете по каждой элементарной задаче тему создавать и в какой-то момент всем это надоест...
Dim ws As Worksheet, ot
For each ws in thisworkbook.sheets
For Each ot In ws.DrawingObjects
If TypeOf ot.Object Is msforms.ToggleButton Then ot.Object.Value = 0
Next
next