Macro para abrir aplicaciones de Microsoft

Es muy probable que en tu trabajo diario Trabajes con varias aplicaciones de Microsoft como Word, Power Point o Outlook.

Aqui tienes una solucion fácil y rápida para abrirlas desde tu propio excel

Código de la macro

Sub AbrirAplicacionMicrosoft()

Dim Indice As Byte

On Error Resume Next

Indice = InputBox(«Digita el numero segun la aplicacion que quieres abrir» & vbNewLine & «1 : Word» & vbNewLine & «2 : PowerPoint» & vbNewLine & «3 : Outlook» & vbNewLine & «4 : Acces», «Excel y Finanzas», 1)

If Indice < 1 Then Exit Sub

Application.ActivateMicrosoftApp Index:=Indice

End Sub

Como copiar y pegar el código

Como insertar una macro en la cinta de opciones personalizada