Laaariii

Olá! Estou precisando de uma ajuda.

Gostaria de enviar no corpo de email dois intervalos diferentes de uma mesma planilha, por exemplo, D5:F7 e abaixo A1:D1.

Consegui enviar o email com um intervalo único através deste código que encontrei na internet:

Sub enviar_corpo_email()   
	ActiveSheet.Range("D5:F7").Select    
	ActiveWorkbook.EnvelopeVisible = True    
	With ActiveSheet.MailEnvelope       
		.Introduction = ""       
		.Item.To = "email para envio"       
		.Item.Subject = "Título Assunto"       
		.Item.Send    
	End With 
End Sub

Porém, não consigo modificar para enviar da maneira que preciso.

Alguém que possa me ajudar?

Olá! Estou precisando de uma ajuda.

Gostaria de enviar no corpo de email dois intervalos diferentes de uma mesma planilha, por exemplo, D5:F7 e abaixo A1:D1.

Consegui enviar o email com um intervalo único através deste código que encontrei na internet:

Sub enviar_corpo_email()
   ActiveSheet.Range("D5:F7").Select
   ActiveWorkbook.EnvelopeVisible = True
   With ActiveSheet.MailEnvelope
      .Introduction = ""
      .Item.To = "email para envio"
      .Item.Subject = "Título Assunto"
      .Item.Send
   End With
End Sub

Porém, não consigo modificar para enviar da maneira que preciso.