Ir ao conteúdo
  • Cadastre-se

Rafael Ludovico

Membros Juniores
  • Total de itens

    2
  • Registro em

  • Última visita

  • Qualificações

    N/D
  1. Funcionou perfeitamente! Muito obrigado!
  2. Boa tarde. Fiz uma macro simples com o intuito de disparar alguns relatórios por email utilizando o outlook. Ela já está funcionando perfeitamente, mas não estou conseguindo formatar o texto da mensagem, pois nem todo o texto está direto no VBA, uma parte vem do excel. Sub Enviar_Relatorios() Dim OutApp As Object Dim OutMail As Object Dim strbody As String Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(0) strbody = Range("f5").Value & " boa tarde!</br>" & _ "<br/>" & "<br/>" & "Segue o relatório semanal de Performance da equipe do " & Range("d5").Value & "." & _ "<br/>" & "<br/>" & "Atenciosamente," On Error Resume Next With OutMail .Display .To = Range("A5").Value .CC = Range("B5").Value .BCC = "" .Subject = Range("G5").Value .HTMLBody = strbody & "<br>" & .HTMLBody .Attachments.Add Range("I5").Value .Attachments.Add Range("J5").Value .Attachments.Add Range("K5").Value .Attachments.Add Range("L5").Value .Attachments.Add Range("M5").Value .Attachments.Add Range("N5").Value .Attachments.Add Range("O5").Value .Attachments.Add Range("P5").Value .Attachments.Add Range("Q5").Value .Attachments.Add Range("R5").Value .Display End With On Error GoTo 0 Set OutMail = Nothing Set OutApp = Nothing End Sub No campo strbody, ao tentar formatar o texto a macro da erro. Conseguem me ajudar?

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

GRÁTIS: minicurso “Como ganhar dinheiro montando computadores”

Gabriel TorresGabriel Torres, fundador e editor executivo do Clube do Hardware, acaba de lançar um minicurso totalmente gratuito: "Como ganhar dinheiro montando computadores".

Você aprenderá sobre o quanto pode ganhar, como cobrar, como lidar com a concorrência, como se tornar um profissional altamente qualificado e muito mais!

Inscreva-se agora!