Hoja Activa

2 envíos / 0 nuevos
Último envío
ROSA NELLY
Imagen de ROSA NELLY
Offline
última acción: Hace 2 años 11 meses
alta: 13/07/2018 - 00:09
Puntos: 25
Macro para enviar Hoja activa de excel por outlook a los destinatarios descritos en varias celdas

Hola,

Realice esta instruccion para copiar la hoja activa a un nuevo libro copiando los datos del "destinatario" y con "copia para" de la misma hoja. Solo no Funciona. Pudierais ayudarme?. Gracias.

Sub Outlook_Co_Excel()

Dim OutApp As Object

Dim OutMail As Object

Set OutApp = CreateObject("Outlook.Application")

Set OutMail = OutApp.CreateItem(0)

On Error Resume Next

ActiveSheet.Copy

With ActiveWorkbook

.OutMail

.To = Range("C5").Value

.CC = Range("H6").Value

.BCC = ""

.Subject = Range("C6").Value Seguir leyendo... sobre Macro para enviar Hoja activa de excel por outlook a los destinatarios descritos en varias celdas

Subscribe to RSS - Hoja Activa