Очистить все учетные данные запроса от подключения ODBS при запуске файла Excel

Question

Я пытаюсь удалить все учетные данные запроса из моего подключения ODBS при запуске файла Excel.

Ручной способ сделать это: ДАННЫЕ -> GET DATA -> DATA SOURCE SETTINGS -> CLEAR ALL PERMISSIONS.

Я пытался:

Private Sub workbook_open()
    Dim MyCon As WorkbookConnection
    Dim ODBCMyCon As ODBCConnection

    For Each MyCon In ThisWorkbook.Connections
        Set ODBCMyCon = MyCon.ODBCConnection
        ODBCMyCon.SavePassword = False
    Next

    For Each MyCon In ThisWorkbook.Connections
        ODBCMyCon.connection.Refresh
    Next

    MsgBox ("Connection credentials are cleared")
End Sub

Как я могу автоматически очистить разрешения?