Вопрос : Как могу я вызвать макрос когда «пошлите к функция почте» использует?

Hi специалисты,

Is там дорога я могу вызвать макрос если потребитель использует «посылает к почте как функцию приложение» в Эксел?  Я имею макрос бежит проверка и я хотел был бы это быть исполненным прежде чем потребитель пошлет архив как приложение.  (Если по возможности с cancel булевским я могу использовать для выкидки если обязательно).


Joe.



Thanks заранее (я использую первенствую 2003, но 2007 были бы о'кейом если 2003 не могут поддержать.), то class=

Ответ : Как могу я вызвать макрос когда «пошлите к функция почте» использует?

В модуле ThisWorkbook workbook, используйте Кодего ниже. Отрегулируйте случай щелчка как нужно.


1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
Вариант точный
Приватный btn WithEvents как CommandBarButton

Приватное Sub btn_Click (ByVal Ctrl как Office.CommandBarButton, CancelDefault как булевско)
    'испытайте ваше состояние для того чтобы отменить посылку
    Если MsgBox, то («вы желаете послать? », vbYesNo) = vbNo после этого
        CancelDefault = True
    Закончитесь если
Закончите подводную лодку

Приватное Sub Workbook_Open ()
    Установите btn = Application.CommandBars.FindControl (удостоверение личности: =2188)
Закончите подводную лодку
Другие решения  
  •  Как я добавляю кнопки на форме PDF для того чтобы добавить/извлекаю рядки данных?
  •  Шнур ошибки в блоке задвижки?
  •  сколько вариант сервера SQL на одной машине
  •  Внешний вид 2007 не может архивный файл открытой сети сохраненный
  •  Активно директория DNS записывает вопрос
  •  Отчет о доступа 2010 экспорта к CSV с коллекторами?
  •  Прокладчик OCE 9400 не начинает
  •  как добавить десятичное место в формуле в отчете о кристалла seagate
  •  Windows XP и Мичрософт Оутлоок и проблемы установителя Windows
  •  VB6 к VS2010 - консультации тренировки?
  •  
    programming4us programming4us