Como remover tipos específicos de anexos de e-mails no Outlook?
Gerenciar anexos de e-mail no Outlook pode ser desafiador, especialmente quando determinados tipos de arquivos—como .docx ou .png—entulham sua caixa de entrada. Embora o Outlook não tenha um recurso embutido para remover anexos específicos de vários e-mails de uma só vez, existem soluções eficientes. Você pode usar scripts VBA para excluir manualmente anexos com base no tipo de arquivo, ou optar por uma solução mais rápida e amigável com o Kutools para Outlook, que permite filtrar e remover anexos em poucos cliques. Este guia mostrará ambos os métodos.
Remover um tipo específico de anexo usando VBA (Manual e Técnico)
Remova rapidamente tipos específicos de anexos com o Kutools para Outlook 👍 (Rápido e Fácil de Usar)
Remover um tipo específico de anexo usando VBA
Passo 1: Selecione múltiplos e-mails
Na visualização de E-mail, selecione os e-mails com os anexos que deseja remover.
Passo 2: Abra o editor VBA
Pressione Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
Passo 3: Adicione o código VBA
Na janela VBA, clique em Inserir > Módulo para criar um novo módulo. Em seguida, copie o seguinte script VBA e cole-o no novo módulo:
VBA: Remover um tipo específico de anexos de e-mails
Sub DeleteSpecificTypeOfAttachments()
Dim xSelection As Outlook.Selection
Dim xItem As Object
Dim xMailItem As Outlook.MailItem
Dim xAttachment As Outlook.Attachment
Dim xFileType As String
Dim xType As String
Dim xFSO As Scripting.FileSystemObject
Dim I As Integer
On Error Resume Next
Set xSelection = Outlook.Application.ActiveExplorer.Selection
Set xFSO = New Scripting.FileSystemObject
xType = ""
xType = InputBox("Enter the attachment type to remove (e.g., docx, png):", "Kutools for Outlook", xType, 8)
If Len(Trim(xType)) = 0 Then Exit Sub
For Each xItem In xSelection
If xItem.Class = olMail Then
Set xMailItem = xItem
If xMailItem.Attachments.Count > 0 Then
For I = xMailItem.Attachments.Count To 1 Step -1
Set xAttachment = xMailItem.Attachments.Item(I)
xFileType = xFSO.GetExtensionName(xAttachment.FileName)
If InStr(1, xFileType, Trim(xType), vbTextCompare) > 0 Then
xAttachment.Delete
End If
Next I
xMailItem.Save
End If
End If
Next
Set xMailItem = Nothing
Set xFSO = Nothing
End Sub
Passo 4: Ative o Microsoft Scripting Runtime
1. No editor VBA, clique em Ferramentas > Referências.
2. Na caixa de diálogo Referências - Project1, marque a caixa Microsoft Scripting Runtime e clique em OK.
Passo 5: Execute o script VBA
1. Pressione F5 ou clique no botão Executar para executar o código.
2. Uma caixa de prompt aparecerá, insira o tipo de anexo que deseja remover (por exemplo, xlsx). Clique em OK.
Resultado
O script VBA removerá todos os anexos correspondentes ao tipo especificado dos e-mails selecionados.
Limitações deste método:
- ❌ Requer conhecimento de VBA: Não é amigável para iniciantes e pode ser difícil para usuários não técnicos.
- ❌ Sem pré-visualização ou desfazer: Uma vez que os anexos são excluídos, eles não podem ser restaurados.
- ❌ Execução manual necessária: O script deve ser executado toda vez que você precisar remover anexos.
- ❌ Possibilidade de exclusão acidental: Se você inserir o tipo de arquivo errado, anexos indesejados podem ser removidos.
Se você frequentemente precisa remover anexos de e-mails, o método do Kutools para Outlook é uma solução muito mais eficiente e amigável.
📂 Arquive Anexos Automaticamente com Facilidade!
Gerenciar grandes volumes de anexos de e-mail acaba de ficar fácil! Com o recurso Auto Detach do Kutools for Outlook, os anexos recebidos são salvos automaticamente em uma pasta designada e substituídos por hiperlinks nos e-mails. Diga adeus aos processos manuais e às caixas de entrada bagunçadas — abrace a automação perfeita hoje mesmo!
💡 Benefícios que Você Vai Adorar:
- ✔️ Salve anexos automaticamente assim que chegarem
- ✔️ Mantenha os e-mails organizados com substituições por hiperlinks
- ✔️ Opções totalmente personalizáveis para atender ao seu fluxo de trabalho
Remova rapidamente tipos específicos de anexos com o Kutools para Outlook 👍
Para uma solução mais eficiente e amigável, o Kutools para Outlook oferece o recurso Desanexar Todos, permitindo que você remova tipos específicos de arquivos de vários e-mails em poucos cliques. Ao contrário do método VBA, nenhum código ou execução manual é necessário.
Desbloqueie a máxima eficiência de e-mail com o Kutools para Outlook! Acesse 70 recursos poderosos totalmente grátis, para sempre. Faça o download da Versão Gratuita Agora!
Passo 1: Selecione múltiplos e-mails e acesse o recurso Desanexar Todos
Na visualização de E-mail, selecione os e-mails contendo os anexos que deseja remover. Em seguida, clique em Kutools Plus > Ferramentas de Anexo > Desanexar Todos.
Passo 2: Defina as preferências de desanexação
- Clique no
Selecionar ícone para especificar uma pasta de destino para salvar os anexos. - Clique em Opções avançadas para expandir a caixa de diálogo.
- Na seção Condições de filtro, marque a caixa Tipo de anexo. Em seguida, insira as extensões de arquivo (por exemplo, .docx; .png) que deseja remover na caixa de texto.
- Clique OK para confirmar.
Selecionar ícone para especificar uma pasta de destino para salvar os anexos.
Passo 3: Confirme a desanexação
Uma caixa de diálogo de confirmação Desanexar Todos aparecerá. Clique em Sim para prosseguir.
Resultado: O que acontece depois?
1. Todos os anexos especificados são desanexados dos e-mails selecionados.
2. Os anexos são salvos de forma segura na pasta especificada em vez de serem excluídos permanentemente. Se necessário, você pode restaurá-los clicando em Kutools Plus > Ferramentas de Anexo > Restaurar Todos.
3. Cada hiperlink no e-mail original representa um arquivo desanexado, proporcionando acesso rápido enquanto mantém sua caixa de entrada organizada.
Por que escolher este método?
- ✅ Nenhuma habilidade técnica necessária: Simples, intuitivo e amigável para iniciantes.
- ✅ Processamento em lote com um clique: Remove anexos de vários e-mails de uma só vez.
- ✅ Seguro e organizado: Ao contrário do VBA, os anexos não são excluídos, mas salvos em outro local.
- ✅ Personalização flexível: Filtre por tipo de anexo, remetente de e-mail, intervalo de datas e mais.
Melhores Ferramentas de Produtividade para Office
Notícia de Última Hora: Kutools para Outlook Lança Versão Gratuita!
Experimente agora a nova versão GRATUITA do Kutools para Outlook, com mais de70 recursos incríveis para você usar PARA SEMPRE! Clique para baixar agora!
📧 Automação de Email: Resposta automática (Disponível para POP e IMAP) / Agendar envio de emails / CC/BCC automático por Regra ao enviar email / Encaminhamento automático (Regra avançada) / Adicionar saudação automaticamente / Dividir automaticamente emails com múltiplos destinatários em mensagens individuais...
📨 Gerenciamento de Email: Recallar Email / Bloquear emails suspeitos por assunto e outros critérios / Excluir Emails Duplicados / Pesquisa Avançada / Organizar Pastas...
📁 Anexos Pro: Salvar em lote / Desanexar em lote / Comprimir em lote / Salvar automaticamente / Desanexar automaticamente / Auto Comprimir...
🌟 Interface Mágica: 😊Mais emojis bonitos e estilosos / Aviso quando emails importantes chegarem / Minimizar Outlook ao invés de fechar...
👍 Recursos com Um Clique: Responder a Todos com Anexos / Emails Anti-Phishing / 🕘Exibir o fuso horário do remetente...
👩🏼🤝👩🏻 Contatos & Calendário: Adicionar contatos em lote a partir de emails selecionados / Dividir um grupo de contatos em grupos individuais / Remover lembrete de aniversário...
