Cuestión : ¿Cómo puedo accionar una macro cuando “enviar la función del correo” se utiliza?

¿Hola los expertos,

Is allí una manera puedo accionar una macro si el usuario utiliza “envía al correo como la función de accesorio” en Excel?  Tengo una macro que funcione con un cheque y quisiera que esto fuera ejecutada antes de que el usuario envíe el archivo como accesorio.  (Si es posible con una cancelación boleana puedo utilizar para abortar en caso de necesidad).
del

Joe.

(del

Thanks por adelantado estoy utilizando sobresalgo 2003, pero 2007 serían autorización si 2003 no pueden apoyar.) class= del

Respuesta : ¿Cómo puedo accionar una macro cuando “enviar la función del correo” se utiliza?

En el módulo de ThisWorkbook del libro de trabajo, utilizar el código abajo. Ajustar el acontecimiento del tecleo según lo necesitado.


1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
Opción explícita
BTN privado de WithEvents como CommandBarButton

btn_Click secundario privado (Ctrl de ByVal como Office.CommandBarButton, CancelDefault como boleano)
    'probar su condición para cancelar el envío
    ¿Si MsgBox (“usted desea enviar? ”, vbYesNo) = vbNo entonces
        CancelDefault = verdad
    Terminar si
Terminar el submarino

Workbook_Open secundario privado ()
    Fijar BTN = Application.CommandBars.FindControl (identificación: =2188)
Terminar el submarino
Otras soluciones  
 
programming4us programming4us