El uso de este (o cualquier) de secuencia de comandos en un programa como Apple Mail, usted podría crear un servicio de Automator.
Lanzamiento de la Automator programa.
Cuando se dice de Elegir un tipo de documento, seleccione el Servicio y haga clic en Elegir
En la parte superior de diálogo, seleccione el Servicio que recibe ninguna entrada en el Correo.la aplicación (o el nombre de su programa, o cualquier aplicación si eso es lo que quieres).
Usted va a insertar una acción: De las Utilidades de grupo, haga doble clic en Ejecutar AppleScript.
Seleccione el texto que dice
(* Your script goes here *)
y pegar en la secuencia de comandos que desea ejecutar. En su caso, la secuencia de comandos que desea pegar es
tell application "Mail"
set theSelection to selection
set theMessage to item 1 of theSelection
set theSubject to subject of theMessage
tell application "Address Book"
set theGroup to make new group with properties {name:theSubject}
end tell
set theRecipients to to recipients of item 1 of theMessage
repeat with a from 1 to count theRecipients
set theRecipient to item a of theRecipients
tell application "Address Book"
set theName to name of theRecipient
tell application "Mail" to set theAddress to address of theRecipient
set thePerson to make new person with properties {first name:name of theRecipient}
make new email at end of emails of thePerson with properties {value:theAddress}
add thePerson to theGroup
end tell
end repeat
set theRecipients to cc recipients of item 1 of theMessage
repeat with a from 1 to count theRecipients
set theRecipient to item a of theRecipients
tell application "Address Book"
set theName to name of theRecipient
tell application "Mail" to set theAddress to address of theRecipient
set thePerson to make new person with properties {first name:name of theRecipient}
make new email at end of emails of thePerson with properties {value:theAddress}
add thePerson to theGroup
end tell
end repeat
tell application "Address Book" to save
end tell
Una vez hecho esto, vaya al Archivo de menú y haga clic en Guardar.
Dar el servicio de un nombre que usted va a recordar, como "Agregar Destinatarios a Grupo".
Luego, cuando usted está en el Correo, puede seleccionar un mensaje o mensajes y vaya al Correo de menú en la barra de menú, a continuación, los Servicios de menú en el menú de Correo electrónico, y seleccione el servicio de Añadir Destinatarios para el Grupo.