Outlook – Opción ejecutar un script (run a script) no aparece en las reglas

En la semana actualice a Office 2016 el cual me percate al igual que otros usuarios que nos comentarón que no esta habilitada la opción ejecutar un script (run a script) en Outlook 2016, revisamos y esto es por cuestión de seguridad el cual de forma predeterminada este esta des habilitado.

Si instalamos Office de cero simplemente no muestra la opción ejecutar un script

Outlook rules wizard no muestra ejecutar un script
Outlook rules wizard no muestra ejecutar un script

 

Si actualizamos y teníamos reglas que ejecutaban script estos dejaran de funcionar y al querer editar mostrara el mensaje Esta acción no esta disponible en el modo actual (This action is not available in the current mode).

Outlook rules wizard no muestra ejecutar un script esta accion no esta disponible en el modo actual
Outlook rules wizard nmensaje esta accion no esta disponible en el modo actual

Habilitar opción ejecutar un script

Solución Automática

1.- Descargamos el registro siguiente

2.- Con Outlook cerrado damos doble clic para instalar la llave de registro.

3.- Abrimos outlook, en el asistente de configuración de reglas y nos debe aparecer la opción ejecutar un script.

Solución Manual

Importante tener precaución al editar el registro se puede corromper si no se tiene precaución. [Como realizar un respaldo del registro de Windows y Restaurar un respaldo de registro de Windows]

1.- Teniendo Outlook cerrado, en el registro agregamos la llave EnableUnsafeClientMailRules con valor DWORD, Hexadecimal, 1.

Office 2016: HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Outlook\Security

Office 2013: HKEY_CURRENT_USER\Software\Microsoft\Office\15.0\Outlook\Security

Outlook rules wizard registro habilitar opcion ejecutar un script
Outlook rules wizard registro habilitar opcion ejecutar un script

2.- Abrimos outlook, en el asistente de configuración de reglas y nos debe aparecer la opción ejecutar un script.

Outlook rules wizard habilitada ejecutar un script
Outlook rules wizard opcion habilitada ejecutar un script
Califica este articulo

Fernando O.

Soy analista de sistemas actualmente trabajo en una empresa con mas de 200 empleados que utilizan equipo de computo al cual se les da soporte en el departamento.
Uno de mis pasatiempos fuera de la empresa es escribir artículos para PortalMasTips donde documento los problemas, inquietudes y detalles interesantes que se presentan.

17 comentarios en “Outlook – Opción ejecutar un script (run a script) no aparece en las reglas

  1. Estoy utilizando este script junto con unas reglas para que cuando llegue un correo con un asunto determinado automáticamente se guarde en una carpeta del disco duro, el problema es que he hecho varias pruebas con mi equipo y funciona, pero al ponerlo en el equipo que necesito que funcione no guarda nada.

    Espero pueda ayudarme.
    Gracias de antemano.

    Public Sub saveMailtoDisk(item As Outlook.MailItem)
    Dim carpetadestino As String
    Dim nombre As String
    Dim dateFormat
    If item.Attachments.Count > 0 Then

    nombre = item.Attachments.item(1).FileName
    dateFormat = Format(Now, “yyyy-mm-dd H-mm”)
    carpetadestino = “C:\pruebas”
    item.SaveAs carpetadestino & “\” & nombre & ” – ” & dateFormat & “.msg”
    Else

    nombre = item.Subject
    dateFormat = Format(Now, “yyyy-mm-dd H-mm”)
    carpetadestino = “C:\pruebas”
    item.SaveAs carpetadestino & “\” & nombre & ” -SIN ADJ- ” & dateFormat & “.msg”

    End If

    • Buen dia fonsiblogblg

      Puedes verificar si esta ejecutando el script, Cambia lo que tienes en la función por MsgBox (“Hola”) el cual cuando se ejecute la regla determinada con el script te debe mostrar un mensaje Hola.

      Nos comentas.

      Saludos.

    • Buen dia fonsiblogblog

      Si recibes muchos adjuntos de diferentes extensiones puedes usar para descartar las imagenes de las firmas por ejemplo lo siguiente

      If (item.Attachments.Count > 0) And (item.Attachments.item.Size > 5000) Then

      El peso para excluir los archivos es en Bytes en el ejemplo va a excluir los archivos de menos de 5Kb

      o puedes agregar algo asi para ejecutar solo para alguna extensión de archivos.

      If (item.Attachments.Count > 0) And (InStr(UCase(item.Attachments.DisplayName), “.XML”)) Then

      Saludos.

  2. Al final era problema de la configuración del outlook, pero solucionado y funcionando.

    Al guardar el mensaje no teniendo ningún archivo adjunto pone el nombre del asusto del mensaje, pero hoy me ha llegado uno en el que no tenía adjunto, pero venía con una imagen en el cuerpo de texto y ha cogido el nombre de esa imagen (“ejemplo.img”) como asunto y ha nombrado el mensaje que se guarda en el disco duro, ¿Qué podría hacer para que coja el propio asunto del mensaje y obvie la imagen?

    Gracias de antemano.
    Saludos.

  3. Buen día!

    Te comento que ya me aparece la opción de ejecutar un Script.
    En lo que tenemos problemas es que no me aparecen las macros en el Formulario para asignar el Script a las reglas.

    Saludos.

Deja un comentario...

Compartir1
Twittear
+1
Compartir
Pin
Stumble