Estoy sacando para el día pero si la función de VBA no trabaja, Y los vbs que la escritura trabaja apenas muy bien ya, usted pueden llamar la escritura de los vbs de su función del acceso VBA como esto
Función pública LuanchWebEmailer ()
'Xmlhttp dévil como objeto
'Fijar el xmlhttp = CreateObject (“Microsoft.XMLHTTP
”)
'xmlhttp. Abierto “CONSEGUIR”, “
http://governor.mt.gov/default.asp”
, falso
'xmlhttp. Enviar
'Fijar el xmlhttp = nada
Amortiguar el varReturn
varReturn = Shell (“WScript.exe” y Chr (34) y “C:\MyFolder\SubFolder\TheNameOfTheScript.vbs
”
y Chr (34))
Función del final
Charla a usted mañana.
Cuadrilla de OM