2 maneiras fáceis de converter rapidamente um e-mail em um convite de reunião no Outlook

Se você deseja converter um e-mail do Outlook em um convite de reunião, consulte este post. Aqui vamos compartilhar 2 abordagens rápidas com você.

Ao receber um e-mail que contém muitas informações sobre uma reunião a ser agendada, você pode criar rapidamente uma reunião diretamente a partir desse e-mail. Nessa situação, você pode usar um dos 2 métodos a seguir conforme suas necessidades.

Método 1: converter sem anexos de e-mail originais

1. Para começar, selecione o e-mail que você deseja.
2. Em seguida, clique no botão “Reunião” no grupo “Responder” na guia “Página inicial”.
3. Imediatamente, um convite para reunião será exibido, conforme mostrado na figura a seguir.

Observações:

• Dessa forma, se o e-mail original tiver anexos, os anexos não serão copiados para a reunião.
• E, como você pode ver, o corpo da reunião contém o cabeçalho do e-mail original, como remetente ou destinatário original e assim por diante.

Se desejar que os anexos de e-mail originais possam ser copiados para a reunião e o cabeçalho do e-mail original possa ser excluído, você pode usar o Método 2.

Método 2: converter com anexos de e-mail originais

1. Para comotart, pressione “Alt + F11” para acionar o editor VBA do Outlook.
2. Em seguida, copie o código a seguir em um projeto ou módulo.

Sub ConvertEmailtoMeeting() Dim objMail As Outlook.MailItem Dim objMeeting As Outlook.AppointmentItem Dim objAttachment As Outlook.Attachment Dim strFilePath As String Selecionar Caso Outlook.Application.ActiveWindow.Class Caso olInspector Definir objMail = ActiveInspector.currentItem Caso olExplorer Definir objMail = ActiveExplorer. Selection.Item(1) End Select Set objMeeting = Outlook.Application.CreateItem(olAppointmentItem) 'Copiar anexos se objMail.Attachments.Count > 0 Então para cada objAttachment em objMail.Attachments strFilePath = CStr(Environ("USERPROFILE")) & "\AppData\Local\Temp\" & objAttachment.FileName objAttachment.SaveAsFile (strFilePath) objMeeting.Attachments.Add strFilePath Kill strFilePath Next End If Com objMeeting .Subject = objMail.Subject 'Excluir Cabeçalho Original do Email .Body = objMail.Body . MeetingStatus = olMeeting .Display End With End Sub

3. Depois disso, saia do editor e adicione esta macro à Barra de Ferramentas de Acesso Rápido (QAT).
4. Por fim, selecione ou abra um e-mail e clique no botão de macro no QAT.
5. Imediatamente, um convite para reunião aparecerá, conforme mostrado na captura de tela abaixo. Os anexos de e-mail originais estão incluídos e não há cabeçalho de e-mail original no corpo.

Resolver problemas do Outlook

Embora o Outlook seja um cliente de e-mail completo, ele ainda não consegue se livrar de uma falha mortal que o torna vulnerável. Em outras palavras, ele pode ser corrompido facilmente. Isso também significa que seus dados do Outlook estão sempre em perigo. Nesta circunstância, o most ação crucial e imperativa é fazer backups de dados regulares para o Outlook. Além disso, é sábio se apossar de um poderoso Correção do Outlook ferramenta, como DataNumen Outlook Repair.

Introdução do autor:

Shirley Zhang é especialista em recuperação de dados em DataNumen, Inc., líder mundial em tecnologias de recuperação de dados, incluindo corrupção de sql e produtos de software de reparo do Outlook. Para mais informações visite www.datanumen.com