Creando un servicio de Automator para agregar mensajes de correo electrónico a Reminders.app

No tengo el atajo de teclado, pero acabo de terminar un Actionscript que agrega el Asunto del correo electrónico como el Título del Recordatorio, el Cuerpo del correo electrónico como el Contenido del Recordatorio y luego agrega un enlace al correo electrónico real en la parte inferior del Recordatorio. ¡Espero que esto ayude!

ejecutar {input, parámetros}
decir a la aplicación "Calendario" que se active
decir a la aplicación "Calendario"
    establecer minimizado de la ventana 1 a verdadero
    decir a la aplicación "Mail"
        establecer laSelección a selección
        establecer elMensaje a elemento 1 de laSelección
        establecer laurl a "message://%3c" & id del mensaje de elMensaje & "%3e"
        establecer thedes a contenido de elMensaje & "Mostrar en Mail " & "message://%3c" & id del mensaje de elMensaje & "%3e"
        establecer la entrada a asunto de elMensaje
    fin decir
fin decir
decir a la aplicación "Calendario"
    decir a la aplicación "Recordatorios"
        hacer nuevo recordatorio al final con propiedades {nombre:input, cuerpo:thedes}
        decir a la aplicación "Recordatorios" que se active
    fin decir
fin decir
devolver entrada

fin ejecutar

Puedes crear un atajo para un servicio. En Preferencias del Sistema, Teclado y Ratón, Atajos de Teclado: agrega un nuevo atajo para Todas las Aplicaciones (si deseas usarlo en todas partes). Asegúrate de que coincida exactamente el texto del menú de servicios, incluyendo mayúsculas y espacios.

Pude crear un servicio que ejecuta un AppleScript y se puede activar con un atajo de teclado.

Primero añado la acción Obtener mensajes de correo seleccionados con Mensajes seleccionados en las opciones. Luego utilicé la acción Ejecutar AppleScript con el siguiente AppleScript:

on run {input, parameters}

tell application "Mail"
    set _sel to selection
    set _links to {}

    set the _message to item 1 ¬
        of the _sel
    set theSubject to subject of _message
    set message_id to the message id of the _message
end tell

set message_url to "message://%3c" & message_id & "%3e"
set end of _links to message_url
set the clipboard to (_links as string)

set theBody to the clipboard

tell application "Reminders"
    set theReminder to make new reminder with properties {name:theSubject, body:theBody, priority:1}

end tell

return input

end run

Esto no añade el cuerpo del correo electrónico a la aplicación Recordatorios, pero utiliza el asunto como título del recordatorio y añade un enlace al mensaje de correo electrónico en el campo de notas del recordatorio.

Recopilé respuestas de este hilo y de otros lugares en un flujo de trabajo de "Recordatorio de respuesta por correo electrónico" que establece un recordatorio para responder a un correo electrónico, está en github aquí