Удаление сертификатов из личного хранилища пользователя скриптом

Хочу скриптом удалить их личного хранилища пользователя просроченные сертификаты.
Без использования powershell.

Подскажите как сделать.

Перебрал уже разные объекты коллекций сертификатов - все не поддерживают метод удаления ...

' Текущее время и граница поиска
Today = Date

' Открываем хранилище (пример: текущее пользовательское хранилище «MY»)
Set Store = CreateObject("CAPICOM.Store")
Store.Open

Set Certificates = Store.Certificates
Set CertExpired    = CreateObject("Scripting.Dictionary")

' Перебираем все сертификаты в хранилище
For Each Cert In Certificates

    ' Проверяем, не истёк ли сертификат
    If Cert.ValidToDate < Today Then

        ' Сертификат истек - нужно удалить

    WScript.Echo Cert.SubjectName & "  " & Cert.ValidToDate

    certExpired.Add Cert, Cert.ValidToDate

    End If
Next

' Перебираем все сертификаты в коллекции на удаление
'For Each Cert In CertExpired

    Certificates.Remove(Cert)

'Next

' Закрываем хранилище
Set Store = Nothing

На строке "Certificates.Remove(Cert)" - ошибка: объект не поддерживает указанный метод