O VBA que vem junto com a instalação do Microsoft Office disponiliza alguns métodos e coleções que facilitam a manipulação de seus próprios aplicativos.
Por exemplo, o objeto Application disponibiliza o método ActivateMicrosoftApp que recebe por parâmetro um Enum que contém os seguintes valores:
Nome | Valor | Descrição |
---|---|---|
xlMicrosoftAccess | 4 | Microsoft Office Access |
xlMicrosoftFoxPro | 5 | Microsoft FoxPro |
xlMicrosoftMail | 3 | Microsoft Office Outlook |
xlMicrosoftPowerPoint | 2 | Microsoft Office PowerPoint |
xlMicrosoftProject | 6 | Microsoft Office Project |
xlMicrosoftSchedulePlus | 7 | Microsoft Schedule Plus |
xlMicrosoftWord | 1 | Microsoft Office Word |
O código abaixo por exemplo, abre o Microsoft Word. Caso o Word já esteja aberto, ele simplesmente o ativa, dando a ele o foco.
Sub StartWord()
Application.ActivateMicrosoftApp xlMicrosoftWord
End Sub
Claro que para o código funcionar, é preciso que o aplicativo esteja instalado no computador. Por exemplo, tentar abrir o Microsoft Project sem tê-lo instalado gera o seguinte erro:
Cannot run ‘WINPROJ.EXE’. The program or one of its components is damaged or missing.
Bom proveito!
Tomás Vásquez
www.tomasvasquez.com.br