VBA:Envie e-mails via Outlook no Excel para Mac 2011

Question

Em um Mac, Office 2011 (patches mais recentes), quero enviar um e-mail via Outlook

Set mailer = CreateObject("Outlook.Application")

o que dá o erro

O componente ActiveX não pode criar objeto

o que parece verossímil, já que não há ActiveX no Mac.

Tentei encontrar soluções alternativas, mas

• eles são bastante datados (2011)
• a macro deve funcionar tanto no Mac quanto no Windows

Qual é atualmente a melhor maneira VBA de enviar um email via Outlook no Office Mac 2011?

Answer 1

cf/ http://msdn.microsoft.com/en-us/library/hh859489(v=office.14).aspx

Como você observa, o Mac não tem ActiveX componentes.

Para o seu VBA, use o link acima para lidar com o caso do Mac e use um if instrução (veja pseudocódigo abaixo):

If Application.OperatingSystem = "MAC" Or Application.OperatingSystem = "Macintosh" OR ...
    DoMacSendMail
Else
    DoWindowsSendMail
End If