Principales respuestas
Como Crear Un Botón En Outlook Para Ejecutar Reglas De Forma Manual

Pregunta
-
tengo 19 reglas en outlook, las cuales no se ejecutan de forma automatica
solo se ejecutan de forma automatica 14 reglas de un total de 19
de forma manual es decir presionando el boton Ejecutar Reglas Ahora en la opción reglas y alertas se ejecutan sin ningun problema.
mi pregunta va orientada a es posible hacer que el boton de ejecutar reglas ahora quede en la barra de herramientas de office, de forma que con solo presionar el boton se ejecuten las 19 reglas ya que de forma manual es la unica forma en que estas se ejecutan.
Saludos
Cosme Cabello - HP
Respuestas
-
No existe dicho botón, de todas formas sería bueno saber porqué no se ejecutan. Quizás sea porque entren en conflicto con otras reglas. Podrías marcar que detenga el proceso de más reglas en sus condiciones o bien colocarlas en los primeros lugares.
Revisa que no haya reglas que se cumplan o puedan cumplirse en varios mensajes o revisa también si pudieras agrupar alguna.
*** Por favor, marca como propuesta o como respuesta la que haya solucionado tu problema.
__________________________________________________
Palel – MVP Outlook
Web de Informatica
Blog Personal
Video Tutoriales- Marcado como respuesta Ismael Borche lunes, 6 de junio de 2011 21:47
Todas las respuestas
-
No existe dicho botón, de todas formas sería bueno saber porqué no se ejecutan. Quizás sea porque entren en conflicto con otras reglas. Podrías marcar que detenga el proceso de más reglas en sus condiciones o bien colocarlas en los primeros lugares.
Revisa que no haya reglas que se cumplan o puedan cumplirse en varios mensajes o revisa también si pudieras agrupar alguna.
*** Por favor, marca como propuesta o como respuesta la que haya solucionado tu problema.
__________________________________________________
Palel – MVP Outlook
Web de Informatica
Blog Personal
Video Tutoriales- Marcado como respuesta Ismael Borche lunes, 6 de junio de 2011 21:47
-
Adjunto Solución a Problema planteado. Sub RunAllRulesOnInbox() Dim st As Outlook.Store Dim myRules As Outlook.Rules Dim rl As Outlook.Rule Dim count As Integer Dim ruleList As String 'On Error Resume Next ' get default store (where rules live) Set st = Application.Session.DefaultStore ' get rules Set myRules = st.GetRules ' iterate all the rules For Each rl In myRules ' determine if it's an Inbox rule If rl.RuleType = olRuleReceive Then ' if so, run it rl.Execute ShowProgress:=True count = count + 1 ruleList = ruleList & vbCrLf & rl.Name End If Next ' tell the user what you did ruleList = "These rules were executed against the Inbox: " & vbCrLf & ruleList MsgBox ruleList, vbInformation, "Macro: RunAllInboxRules" Set rl = Nothing Set st = Nothing Set myRules = Nothing End Sub
Saludos Cosme Cabello C. PSG Field Technical Support Hewlett Packard Chile cosme.cabello@hp.com Av. Mariano Sanchez Fontecilla # 310 Piso 13 Las Condes, Santiago.