Eu estou descolando para o dia mas se a função de VBA não trabalha, E os vbs que o certificado trabalha apenas muito bem já, você podem chamar o certificado dos vbs de sua função do acesso VBA como este
Função pública LuanchWebEmailer ()
'Xmlhttp não ofuscante como o objeto
'Ajustar o xmlhttp = o CreateObject (“Microsoft.XMLHTTP
”)
'xmlhttp. Aberto “COMEÇ”, “
http://governor.mt.gov/default.asp”
, falso
'xmlhttp. Emitir
'Ajustar o xmlhttp = nada
Escurecer o varReturn
varReturn = Shell (“WScript.exe” & Chr (34) & “C:\MyFolder\SubFolder\TheNameOfTheScript.vbs
”
& Chr (34))
Função do fim
Conversa a você amanhã.
Grupo do OM