1
Abrir Excel.
2 Haga clic en " Herramientas " de Microsoft "Macro " y luego en "Visual Basic " . Esto abrirá el entorno de programación VBA.
3
Haga clic en " Insertar" y " módulos". Ahora se encuentra en un módulo de código de programación
4
Escriba o copie y pegue los siguientes procedimientos Sub en el módulo de código : .
Private Sub AutoMatingOffice ()
Dim xlApp Como Excel.Application
WDApp As Word.Application
olApp As Outlook.Application
Set xlApp = CreateObject ( " Excel.Application " )
Set WDApp = CreateObject ( " Word.Application " )
Set olApp = CreateObject ( " Outlook.Application " )
'Su código de programación VBA iría aquí .
< p > 'Su código de programación VBA iría aquí .
' Su código de programación VBA iría aquí .
xlApp.Quit
WDApp.Quit
OLApp.Quit
xlApp Set = Nothing
WDApp Set = Nothing
olApp Set = Nothing End Sub