CÓMO cerrar una instancia de Excel iniciada por combinación de correo

CÓMO cerrar una instancia de Excel iniciada por combinación de correo

este código que se ejecuta dentro del iniciador no tiene acceso a Excel que se ejecuta a través de DDE?

'For i = 1 To Workbooks.Count
'   MsgBox ("here" + Workbooks(i).Name)
'If (Workbooks(i).Name <> ActiveWorkbook.Name) Then
'Workbooks(i).Close
'End If
'Next i

Respuestas a la pregunta(2)

Su respuesta a la pregunta