Como Enviar specífica planilha ou célula como anexo de email?

Às vezes, os usuários do Excel precisam enviar planilha ou célula específica como anexo de e-mail para o chefe da empresa ou faculdade. Para isso, você deve ter conhecimento de como enviar a planilha ou célula por e-mail.

No caso, se você não tem uma ideia real, leia este post, você encontrará várias maneiras de anexar planilhas ou células em e-mail.

Você também saberá como anexar arquivos do Excel a um e-mail.

Portanto, vamos aprender sobre os diferentes métodos para enviar planilhas ou células de email no Excel, mas antes disso, siga as etapas para adicionar o ícone Enviar para Destinatário de Email no Excel.

Como na ausência deste ícone, você não pode prosseguir para enviar planilhas ou células por correio no Excel.

Quais são as etapas para adicionar o ícone Enviar ao destinatário do email?

Siga as etapas abaixo para adicionar o ícone Enviar para destinatário de e-mail em seu Excel:

• Clique no menu Arquivo no Excel.
• Selecione Opções no menu.
• Selecione a opção Barra de ferramentas de acesso rápido.
• Em Escolher comandos em, selecione Todos os comandos.

• Em seguida, role para baixo e escolha Enviar para Destinatário de Email.
• Para adicionar Send to Mail Recipient no painel direito de Customize Quick Access Toolbar: clique em Add.

• Clique no botão Ok.

Você encontrará o ícone Send to Mail Recipient no canto superior esquerdo do Excel. Agora vá para as diferentes maneiras de enviar uma planilha do Excel como um anexo de e-mail .

Como Para Enviar único ou múltiplo planilhas do Excel como um anexo de email?

1 # Enviar planilha específica como anexo de e-mail

Não é possível anexar uma única planilha no e-mail, pois ele só pode anexar arquivos para enviar por e-mail.

Se você deseja enviar a planilha específica por e-mail, primeiro é necessário criar um arquivo de planilha. Portanto, siga as etapas fornecidas abaixo para enviar planilha ou célula específica como anexo de e-mail. 

Primeiro, clique com o botão direito do mouse na planilha específica que deseja anexar ao e-mail.

• Clique na opção Mover ou Copiar… .

• Na caixa de diálogo Mover ou Copiar, selecione (novo livro) na lista Para livro : .
• Marque a caixa de seleção Criar uma cópia.
• Em seguida, clique em OK . Você verá seu novo arquivo de pasta de trabalho com uma cópia da planilha única selecionada.

• Agora clique no ícone Send to Mail Recipient.

• Selecione enviar a pasta de trabalho inteira como um anexo .
• Clique em Ok . Ele anexará seu arquivo de pasta de trabalho recém-criado.

• Clique no botão Enviar.

Usando as etapas acima, você pode criar um novo arquivo de pasta de trabalho e enviar uma única planilha do Excel como anexo de e-mail.

Depois de enviar por e-mail, você pode excluir o arquivo recém-criado, pois já tem essa planilha específica em sua pasta de trabalho original.

2 # Enviar pasta de trabalho inteira como anexo de e-mail

Se você deseja enviar a pasta de trabalho inteira com várias planilhas como um anexo de e-mail , siga as etapas abaixo:

• Primeiro, clique no ícone Enviar para destinatário de e-mail no Excel.
• Selecione enviar a pasta de trabalho inteira como um anexo na caixa de diálogo de e-mail.

• Clique Ok . Ele anexará todo o arquivo da pasta de trabalho a uma caixa de diálogo de e-mail.

• Clique no botão Enviar.

As etapas acima irão anexar toda a sua pasta de trabalho ao e-mail.

3 # Enviar planilha do Excel usando código VBA

Se você enviar planilhas do Excel regularmente, poderá usar o código VBA mencionado abaixo. Siga as etapas abaixo para enviar planilha ou célula específica como anexo de e-mail usando o código VBA:

• Primeiro, abra a pasta de trabalho da qual deseja selecionar o intervalo de células.
• Para abrir o Microsoft Visual Basic , pressione e segure as teclas ALT + F11 .
• Clique em Inserir .
• Selecione Módulo .

• Você encontrará espaço para código na janela Módulo. Copie o código fornecido abaixo e cole-o na janela Módulo .

Option Explicit

Sub EmailandSaveCellValue()

‘Variable declaration

Dim oApp As Object, _

oMail As Object, _

WB As Workbook, _

FileName As String, MailSub As String, MailTxt As String

‘*************************************************  ********

‘Set email details; Comment out if not required

Const MailTo = “some1@someone.com”

Const MailCC = “some2@someone.com”

Const MailBCC = “some3@someone.com”

MailSub = “Please review ” & Range(“Subject”)

MailTxt = “I have attached ” & Range(“Subject”)

‘*************************************************  ********

‘Turns off screen updating

Application.ScreenUpdating = False

‘Makes a copy of the active sheet and save it to

‘a temporary file

ActiveSheet.Copy

Set WB = ActiveWorkbook

FileName = Range(“Subject”) & ” Text.xls”

On Error Resume Next

Kill “C:\” & FileName

On Error Goto 0

WB.SaveAs FileName:=”C:\” & FileName

‘Creates and shows the outlook mail item

Set oApp = CreateObject(“Outlook.Application”)

Set oMail = oApp.CreateItem(0)

With oMail

.To = MailTo

.Cc = MailCC

.Bcc = MailBCC

.Subject = MailSub

.Body = MailTxt

.Attachments.Add WB.FullName

.Display

End With

‘Deletes the temporary file

WB.ChangeFileAccess Mode:=xlReadOnly

Kill WB.FullName

WB.Close SaveChanges:=False

‘Restores screen updating and release Outlook

Application.ScreenUpdating = True

Set oMail = Nothing

Set oApp = Nothing

End Sub

NOTA: Você pode modificar este código alterando algumas das linhas de acordo com suas informações.

• Pressione a tecla Alt + Q para fechar o VBE.
• Em seguida, clique em EmailandSaveCellValue / Tools / Macros para executar o código.

Como enviar por e- mail células selecionadas no Excel?

Nesse caso, você pode enviar o intervalo de células da planilha do Excel usando as várias formas mencionadas a seguir.

Usando esses métodos, você pode selecionar facilmente as células e enviá-las como um anexo de e-mail.

1 # Faixa de envio da célula como corpo da mensagem de e-mail

Nesse caso, você pode enviar um intervalo de células por e-mail . Se você deseja enviar apenas a parte de sua planilha, siga as etapas abaixo:

• Clique no ícone de destinatário Send to Mail .
• Na caixa de diálogo E-mail, selecione Enviar a planilha atual como opção de corpo da mensagem .
• Clique no botão Ok .

• Você encontrará a planilha atual no corpo do e-mail. Em seguida, selecione o intervalo de células no corpo da mensagem de e-mail.
• Na caixa de diálogo Email, insira o destinatário e o assunto .
• Clique em Enviar esta seleção .

• Clique no botão Enviar .

2 # Enviar intervalo de célula usando código VBA

Você também pode enviar um intervalo de células da planilha usando o código VBA como um anexo de e-mail do Outlook. Então, siga as etapas abaixo:

• Primeiro, abra a pasta de trabalho do Excel da qual deseja enviar o intervalo de células como e-mail.
• Para abrir o Editor VBA do Excel, pressione a tecla Alt + F11 .
• Em seguida, no Editor do Excel VBA, clique em Inserir .
• Selecione a opção Módulo .
• Agora ligue o objeto do Microsoft Outlook.

• Clique na guia Ferramentas .
• Selecione Referências… no menu de contexto.
• Na caixa de diálogo do projeto Reference-VBA, pesquise por Microsoft Outlook Object Library e selecione sua caixa de seleção.
• Agora copie o código fornecido abaixo e cole-o na janela do módulo.

Sub SendSelectedCells_inOutlookEmail()

Dim objSelection As Excel.Range

Dim objTempWorkbook As Excel.Workbook

Dim objTempWorksheet As Excel.Worksheet

Dim strTempHTMLFile As String

Dim objTempHTMLFile As Object

Dim objFileSystem As Object

Dim objTextStream As Object

Dim objOutlookApp As Outlook.Application

Dim objNewEmail As Outlook.MailItem

‘Copy the selectionSet objSelection = SelectionSelection.Copy

‘Paste the copied selected ranges into a temp worksheet’

Set objTempWorkbook = Excel.Application.Workbooks.Add(1)Set objTempWorksheet = objTempWorkbook.Sheets(1)

‘Keep the values, column widths and formats in pastingWith objTempWorksheet.Cells(1)

.PasteSpecialxlPasteValues

.PasteSpecialxlPasteColumnWidths

.PasteSpecialxlPasteFormats

End With’Save the temp worksheet as a HTML fileSet objFileSystem = CreateObject(“Scripting.FileSystemObject”)strTempHTMLFile = objFileSystem.GetSpecialFolder(2).Path &”\Temp for Excel” & Format(Now, “YYYY-MM-DD hh-mm-ss”) & “.htm”Set objTempHTMLFile = objTempWorkbook.PublishObjects.Add(xlSourceRange, strTempHTMLFile, objTempWorksheet.Name, objTempWorksheet.UsedRange.Address)objTempHTMLFile.Publish (True)

‘Create a new emailSet objOutlookApp = CreateObject(“Outlook.Application”)Set objNewEmail = objOutlookApp.CreateItem(olMailItem)

‘Read the HTML file data and insert into the email bodySet objTextStream = objFileSystem.OpenTextFile(strTempHTMLFile)objNewEmail.HTMLBody = objTextStream.ReadAllobjNewEmail.Display’

You can specify the new email recipients, subjects here using the following lines:’objNewEmail.To = jyotismith@excel.com’objNewEmail.Subject = “Excel Repair Products”‘objNewEmail.Send –> directly send out this emailobjTextStream.CloseobjTempWorkbook.Close (False)objFileSystem.DeleteFile (strTempHTMLFile)End Sub

NOTA: Você pode modificar este código alterando algumas das linhas de acordo com suas informações.

• Salve o código e selecione as células que deseja enviar.
• Vá para a nova macro .
• Clique na tecla F5.
• Você encontrará um e-mail exibindo as células selecionadas.

3 # Copiar e colar células

Você pode copiar e colar manualmente o intervalo de células de sua planilha como um e-mail do Outlook. Siga as etapas abaixo para enviar células por e-mail do Outlook:

• Abra o arquivo da pasta de trabalho e selecione as células da planilha específica.
• Copie as células pressionando a tecla Ctrl + C.

• Abra seu aplicativo Outlook .
• No Outlook, clique na guia Página inicial .
• Selecione Nova mensagem .
• Em seguida, clique na seção do corpo do e – mail .
• Agora pressione Ctrl + V . Irá colar as células selecionadas copiadas.
• Insira o destinatário e o assunto e clique no botão Enviar .

As etapas acima irão enviar as células selecionadas de uma planilha para o destinatário.

Como anexar arquivos do Excel ao e-mail?

Em vez de enviar planilhas específicas ou múltiplas, se você deseja enviar os arquivos do Excel por e-mail, siga as etapas abaixo:

1. Clique no botão Anexar no e-mail e localize o arquivo que deseja enviar.

• Para localizar o arquivo no Windows 10:

Vá para Acesso rápido e role para baixo, você encontrará seus arquivos recentes.

• Para localizar o arquivo no Mac:

Vá para Todos os meus arquivos e clique em Data de modificação , você encontrará os arquivos recentes na coluna.

2. Copie e cole o caminho do arquivo .

• Clique no menu Arquivo no Excel.
• Selecione a opção Informações no menu.

(Excel 2013 e Excel 2016) 

• Clique com o botão esquerdo no caminho do arquivo e selecione Copiar link para a área de transferência . (Excel 2010)
• Pressione a tecla Ctrl + C para copiar o caminho do arquivo.

• Cole o caminho do arquivo copiado em Nome do arquivo: em um anexo de e-mail.
• Clique no botão Inserir .

Desta forma, você pode anexar seus arquivos Excel e enviá-los por e-mail.

Conclusão

Portanto, trata-se de como você pode enviar planilha ou célula específica como anexo de e-mail. Espero que este post seja útil para você. 

No caso, se o Excel fica corrompido e seu arquivo de pasta de trabalho importante é excluído permanentemente, então você pode usar Excel reparo Ferramenta para voltar a sua ficheiro de livro em seu formato original.

Usando a ferramenta de reparo do Excel, você pode corrigir erros do Excel ou problemas de corrupção para que possa acessar o Excel sem qualquer interferência.