Macro para enviar por correo electrónico

Preguntas y respuestas relacionadas

Al ejecutar macro de excel me dice error 429 activex no puede crear el objeto

Tengo un libro excel con una macro programada, que al ejecutarla lo que hace es adjuntarme un archivo a outlook para poder ser enviado por mail, en una de las pc que ejecute dico macro funciona perfecto, pero en una de la spc la misma macro me dice...
1 respuesta

Buena tarde mi consulta es como crear un macro

Q a los 3 minutos de estar abierto una hoja excel ejecute la acción de enviar esta hoja por correo electrónico a varios destinatarios
1 respuesta

Incluir firma al enviar correos automáticos desde excel 2003

Tengo esta macro Ub enviar() Sheets("Control de alquiler").Select ufila = Range("A" & Rows.Count).End(xlUp).Row For i = 4 To ufila If Cells(i, 14) <= Cells(i, 15) Then Set parte1 = CreateObject("outlook.application") Set parte2 =...
1 respuesta

Manejo de Outlook desde access

Manejo una aplicación de Access 2000 y desde ella mando correos y citas para el calendar, según valores de un formulario el correo lo mando siguiendo el método: Dim objOutlook As Outlook.Application Dim objAppt As Outlook.AppointmentItem Dim...
1 respuesta

Macro de excel que generar un correo que se envíe a través de outlook (con datos filtrados)

Necesito una macro de excel con la que se genere un correo para enviarlo a través de outlook, tomando unicamente los nombres desde la celda C2, hasta lo máximo de la misma asociada a una condición de VENCIDO o POR VENCER ubicada en la celda S2 hasta...
1 respuesta

Abrir outlook para enviar email desde access

Estoy utilizan el siguiente modulo para enviar email desde access, pero solo funciona si outlook esta abierto. ¿Hay alguna forma de abrir por código outlook y después de enviar, cerrarlo? MODULO: ublic Sub SendEMail(ByVal aSubject As String, ByVal...
3 respuestas

Implementar Progress Bar en macro para generar efecto visual

Sub Buscar() 'Mod.Por.DAM Application.ScreenUpdating = False Set h1 = Sheets("Estados de cuenta") Set h2 = Sheets("Cartera.") ' h1.Range("A18:E6000").ClearContents j = 18 Set r = h2.Columns("G") Set b = r.Find(h1.Range("A6"), LookIn:=xlValues,...
1 respuesta

Enviar email desde excel vba a cuenta en google apps

Favor si me puedes ayudar con un inconveniente que tengo con una macro: Tengo una macro donde realizo varios procesos, cuando ya he acomodado los datos necesarios, estos a través de un botón los envío al mail configurado en Microsoft Outlook con la...
1 respuesta

Error 3061:Pocos Parámetros. Se esperaba 2.

Estaba terminando de adaptar el ejemplo que me encontré de neckkito, pero me dejo de funcionar luego de colocar el siguiente criterio en la consulta: Entre [Forms]![frmBusqueda]![txt_Fecha_Ini] Y [Forms]![frmBusqueda]![txt_Fecha_Fin], esto para que...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas de los temas