tag:blogger.com,1999:blog-4623278671508370136.post335882336910797362..comments2023-08-01T13:39:53.991+02:00Comments on EXCEL FORO: Un blog de Excel: VBA: Enviar email desde cuenta específica de OutlookExcelforo - Ismael Romerohttp://www.blogger.com/profile/17680553534095355222noreply@blogger.comBlogger5125tag:blogger.com,1999:blog-4623278671508370136.post-52205922008954848832019-06-26T00:53:05.436+02:002019-06-26T00:53:05.436+02:00Muchas Gracias igualmente Ismael!!
saludos!Muchas Gracias igualmente Ismael!!<br />saludos!jorgehttps://www.blogger.com/profile/17855012723954181825noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-35232631532873809712019-06-20T15:58:13.151+02:002019-06-20T15:58:13.151+02:00Hola,
por desgracia, hasta donde yo se, no es posi...Hola,<br />por desgracia, hasta donde yo se, no es posible compatibilizar la opción de enviar email .Mailenvelope con la elección de cuenta...<br /><br />:'(<br /><br />Si solo quieres enviar una celda como rango adjunto (cells(22,14)), yo añadiría como valor en el cuerpo (.body) del email 'normal'<br /><br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-33055370056293306052019-06-19T20:52:32.024+02:002019-06-19T20:52:32.024+02:00Hola Ismael, antes que nada gracias por la publica...Hola Ismael, antes que nada gracias por la publicación sobre este tema! <br />Estoy intentando usar la propiedad .SendUsingAccount. pero me arroja error "438:el objeto no admite esta propiedad o metodo".<br />Aclaro que no tengo mucha experiencia con macros.<br /><br />Copio parte del código donde creo y envío el correo, y donde debo especificar con que cuenta enviarlo: (espero se entienda y puedas ayudarme)<br /><br />'genero el mail y envio el mismo (PARA MANDAR RANGO DE CELDAS EN EL CUERPO DEL MAIL)<br /> Dim objOL As New Outlook.Application<br /> Dim Destinatario As String<br /> Dim Destinatario2 As String<br /> Dim Asunto As String<br /> Dim Adjunto As String<br /> Set objMail = objOL.CreateItem(olMailItem)<br /> <br /> With objMail<br /> ThisWorkbook.Activate<br /> Destinatario = Hoja1.Cells(13, 13) & "; " & Hoja1.Cells(14, 13) & "; " & Hoja1.Cells(18, 13)<br /> Destinatario2 = Hoja1.Cells(15, 13) & "; " & Hoja1.Cells(17, 13) & "; " & Hoja1.Cells(20, 13)<br /> Asunto = Hoja1.Cells(23, 12) & " al " & Hoja1.Cells(22, 12)<br /> ActiveSheet.Range(Hoja1.Cells(22, 14)).Select 'rango que se muestra en el cuerpo del mail. Éste figura en la hoja1 selda (22,14)<br /> ActiveWorkbook.EnvelopeVisible = True<br /> <br /> With ActiveSheet.MailEnvelope<br /> .Item.To = Destinatario<br /> If nivel = 2 Then 'si hay nivel superior a 3 copiamos a Gerente de área-Alberto<br /> .Item.CC = Destinatario2 & "; " & Hoja1.Cells(19, 13)<br /> Else 'si solo hay nivel 3 copiamos solo a coordinador<br /> .Item.CC = Destinatario2<br /> End If<br /> <br /> .Item.Subject = Asunto<br /> .Introduction = Hoja1.Cells(24, 12) + Hoja1.Cells(24, 13) 'introducimos el texto en el cuerpo del mail<br /> <br />Set .SendUsingAccount = objOL.Session.Accounts.Item(2) 'Elegimos la cuenta con la que se envía el correo (2)<br /> <br /> .Item.Send<br /> End With<br /> End With<br /> Set objMail = Nothing<br /> Set objOL = Nothing<br /><br />Muchas Gracias!<br />saludosjorgehttps://www.blogger.com/profile/17855012723954181825noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-33754843403747262992019-06-19T09:21:09.388+02:002019-06-19T09:21:09.388+02:00Hola Otero,
cómo estás?, un placer saludarte igual...Hola Otero,<br />cómo estás?, un placer saludarte igualmente.<br /><br />Lo siento pero no comprendo..¿podrías ampliar la explicación?<br /><br />Gracias y saludos cordialesExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-41528848591226755812019-06-19T05:54:18.347+02:002019-06-19T05:54:18.347+02:00 Lo que necesito es que cuando ponga en la Celda B... Lo que necesito es que cuando ponga en la Celda B11(Mexico X) me sume toda la columna donde se encuente Mexico X pero que esta sumas este clasificada de acuerdo la clase columna A como mi ejemplo Pongo Mexico 4 Celda B11 y me suma toda la fila F pero las suma son deacerdo a los clase de G Admon, G Venta y G Fijo, solo que esta formula tiene que considera que esta tabla nunca esta ordenada ya que Mexico 4 pude estar en la columna( C, D, E, F, h, I) <br /><br /> <br /><br />oterohttps://www.blogger.com/profile/12749800691588463042noreply@blogger.com