Si a menudo tiene que enviar ciertos libros u hojas por correo electrónico, debería haber notado que este procedimiento no se puede llamar rápidamente. Si lo haces "clásicamente", entonces necesitas:
- abrir un programa de correo electrónico (por ejemplo, Outlook)
- crear un mensaje nuevo
- escriba la dirección, el asunto y el texto
- adjunte un archivo al mensaje (¡no lo olvide!)
- clic en el botón Enviar
De hecho, el correo se puede enviar fácilmente directamente desde Excel de muchas maneras diferentes. Vamos…
Método 1: envío integrado
Si todavía tiene el viejo Excel 2003, entonces todo es simple. Abra el libro/hoja deseado y seleccione del menú Archivo – Enviar – Mensaje (Archivo — Enviar a — Destinatario del correo). Se abrirá una ventana en la que puede elegir una de las dos opciones para enviar:
En el primer caso, el libro actual se agregará al mensaje como archivo adjunto, en el segundo caso, el contenido de la hoja actual irá directamente al texto del mensaje como una tabla de texto (sin fórmulas).
Además, el menú Archivo – Enviar (Archivo — Enviar a) hay algunas opciones de envío más exóticas:
- Mensaje (para revisión) (Destinatario de correo para revisión) – se envía todo el libro de trabajo y, al mismo tiempo, se activa el seguimiento de cambios, es decir, comienza a fijarse claramente: quién, cuándo y en qué celdas hizo qué cambios. A continuación, puede mostrar los cambios realizados en el menú Servicio – Arreglos – Resaltar arreglos (Herramientas — Seguimiento de cambios — Resaltar cambios) o en la pestaña Revisión – Correcciones (Revisar — Seguimiento de cambios) Se verá algo como esto:
Los marcos de colores marcan los cambios realizados en el documento (cada usuario tiene un color diferente). Cuando pasa el mouse, aparece una ventana similar a una nota con una descripción detallada de quién, qué y cuándo cambió en esta celda. Es muy conveniente para revisar documentos, cuando, por ejemplo, editas el informe de tus subordinados o el jefe edita el tuyo.
- A lo largo de la ruta (Destinatario de enrutamiento) – el mensaje donde se adjuntará su libro pasará por una cadena de destinatarios, cada uno de los cuales lo reenviará automáticamente, como un bastón. Si lo desea, puede configurar el mensaje para que regrese al final de la cadena. Puede habilitar el seguimiento de cambios para ver las ediciones realizadas por cada persona en el hilo.
En el nuevo Excel 2007/2010, la situación es ligeramente diferente. En estas versiones, para enviar el libro por correo, es necesario seleccionar el botón Oficina (botón de oficina) o pestaña Archive (Expediente) y equipo Enviar (Enviar). A continuación, se ofrece al usuario un conjunto de opciones de envío:
Tenga en cuenta que en las nuevas versiones, la capacidad de enviar una hoja separada del libro de trabajo insertada en el cuerpo de la carta ha desaparecido, como ocurría en Excel 2003 y versiones posteriores. La única opción que queda es enviar el archivo completo. Pero hubo una oportunidad útil de enviar en el conocido formato PDF y el menos conocido XPS (similar a PDF, pero no requiere Acrobat Reader para leer, se abre directamente en Internet Explorer). El comando para enviar un libro para su revisión se puede extraer como un botón adicional en el panel de acceso rápido a través de Archivo – Opciones – Barra de herramientas de acceso rápido – Todos los comandos – Enviar para revisión (Archivo — Opciones — Barra de herramientas de acceso rápido — Todos los comandos — Enviar para revisión).
Método 2. Macros simples para enviar
Enviar una macro es mucho más fácil. Abrir el editor de Visual Basic a través del menú Servicio – Macro – Editor de Visual Basic (Herramientas — Macro — Editor de Visual Basic), inserte el nuevo módulo en el menú Insertar – Módulo y copie el texto de estas dos macros allí:
Sub SendWorkbook() ActiveWorkbook.SendMail Recipients:="[email protected]", Asunto:="Лови файлик" End Sub SendSheet() ThisWorkbook.Sheets("Лист1").Copiar con ActiveWorkbook .SendMail Recipients:="[email protected]", Asunto:="Capturar el archivo" .Cerrar SaveChanges:=False End With End Sub Después de eso, las macros copiadas se pueden ejecutar en el menú. Servicio – Macro – Macros (Herramientas — Macro — Macros). Enviar libro de trabajo envía el libro actual completo a la dirección especificada, y EnviarHoja — Hoja1 como archivo adjunto.
Cuando ejecute la macro, Excel se pondrá en contacto con Outlook, lo que hará que aparezca el siguiente mensaje de seguridad en la pantalla:
Espere hasta que el botón Resolver se activa y haga clic en él para confirmar su envío. Después de eso, los mensajes generados automáticamente se colocarán en la carpeta. saliente y se enviará a los destinatarios la primera vez que inicie Outlook o, si lo está ejecutando, de inmediato.
Método 3. Macro universal
¿Y si desea enviar no el libro actual, sino cualquier otro archivo? ¡Y también sería bueno configurar el texto del mensaje! Las macros anteriores no ayudarán aquí, ya que están limitadas por las capacidades de Excel en sí, pero puede crear una macro que administre Outlook desde Excel: cree y complete una nueva ventana de mensaje y envíela. La macro se ve así:
Sub SendMail() Dim OutApp As Object Dim OutMail As Object Dim cell As Range Application.ScreenUpdating = False Set OutApp = CreateObject("Outlook.Application") 'iniciar Outlook en modo oculto OutApp.Session.Logon On Error GoTo cleanup' si no comenzó: salga de Set OutMail = OutApp.CreateItem(0) 'cree un nuevo mensaje On Error Resume Next 'llene los campos del mensaje con OutMail .To = Range("A1").Value .Subject = Range("A2"). Valor .Cuerpo = Rango("A3").Valor .Archivos adjuntos.Agregar rango("A4").Valor 'Enviar se puede reemplazar con Mostrar para ver el mensaje antes de enviarlo. : Set OutApp = Nada Application.ScreenUpdating = True End Sub La dirección, el asunto, el texto del mensaje y la ruta del archivo adjunto deben estar en las celdas A1:A4 de la hoja actual.
- Correo grupal desde Excel con el complemento PLEX
- Macros para enviar correo desde Excel a través de Lotus Notes por Dennis Wallentin
- Qué son las macros, dónde insertar código de macro en Visual Basic
- Creación de correos electrónicos con la función HIPERVINCULO