¿Cómo enviar un email automático en Outlook con vba generando una regla y corriendo Run script?

Requiero realizar el código en vba para que en outlook se pueda enviar un correo automático dependiendo de una palabra que esté en el subject del correo y que se responda con un numero consecutivo que nunca se repita al que lo envió.