How to programmatically enable/disable all the exceptions in visual studio.

Question

Hi.

The trivial macro like this:

Private Sub SetStatusAll(ByVal enable As Boolean)
    Dim dbg As Debugger4 = DTE.Debugger
    Dim exceptionSettings As ExceptionSettings = dbg.ExceptionGroups.Item("Common Language Runtime Exceptions")
    For Each exceptionSetting As ExceptionSetting In exceptionSettings
        exceptionSettings.SetBreakWhenThrown(enable, exceptionSetting)
    Next
End Sub

Takes way tooooooooooooooo much time. Any ideas how to make it faster? Thanks.