Skip to main content

Como selecionar e copiar todos os hiperlinks de um documento do Word?

Author: Sun Last Modified: 2025-06-04

Se você tem um documento longo no Word com múltiplos hiperlinks e precisa copiá-los todos de uma vez, selecionar cada um manualmente pode ser demorado. Felizmente, existem maneiras eficientes de extrair e copiar todos os hiperlinks ou apenas seus endereços. Este guia apresentará diferentes métodos para realizar isso rapidamente.


Copiar todos os hiperlinks para um novo documento usando VBA

Usando o VBA, você pode extrair todos os hiperlinks de um documento e copiá-los para um novo documento.

  1. Abra o Documento do Word contendo os hiperlinks e pressione Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
  2. Clique em Inserir > Módulo, depois copie e cole o seguinte código VBA na janela do módulo:
    Sub HyperlinksExtract()
    'Updateby20140214
        Dim oLink As Hyperlink
        Dim docCurrent As Document 'current document
        Dim docNew As Document 'new document
        Dim rngStory As StoryRanges
        Set docCurrent = ActiveDocument
        Set docNew = Documents.Add
        For Each oLink In docCurrent.Hyperlinks
            oLink.Range.Copy
            docNew.Activate
            Selection.Paste
            Selection.TypeParagraph
        Next
        
        Set docNew = Nothing
        Set docCurrent = Nothing
    End Sub
    
  3. Clique no botão Executar para executar o código VBA. Um novo documento será aberto contendo todos os hiperlinks do documento original.
    Document with text with hyperlinks >>> New document with only text with hyperlinks

Nota: Este método VBA funciona apenas para hiperlinks baseados em texto. Ele não extrai hiperlinks incorporados em imagens.


Extrair apenas os endereços dos hiperlinks (texto simples) para um novo documento usando VBA

Este método VBA extrai apenas os endereços dos hiperlinks de um documento e os cola em um novo documento.

  1. Abra o Documento do Word e pressione Alt + F11 para abrir o editor VBA.
  2. Clique em Inserir > Módulo, depois copie e cole o seguinte código VBA:
    Function GetAllHyperlinks()
    'Updateby20140214
        Dim docCurrent As Document
        Dim docNew As Document
        Dim oLink As Hyperlink
        Dim rng As Range
        Application.ScreenUpdating = False
        Set docCurrent = ActiveDocument
        Set docNew = Documents.Add
        For Each oLink In docCurrent.Hyperlinks
            Set rng = docNew.Range
            rng.Collapse
            rng.InsertParagraph
            rng.InsertAfter (oLink.Address)
        Next
        docNew.Activate
        Application.ScreenUpdating = True
        Application.ScreenRefresh
    End Function
    
  3. Clique no botão Executar Um novo documento será criado contendo apenas os endereços dos hiperlinks (texto simples).
    Document with text with hyperlinks >>> New document with only hyperlink addresses

Nota: Os endereços dos hiperlinks extraídos podem não aparecer na mesma ordem que no documento original.


Copiar hiperlinks ou endereços para a área de transferência usando Kutools para Word

Kutools para Word oferece uma maneira simples de copiar todos os hiperlinks ou apenas seus endereços para a área de transferência com alguns cliques.

Kutools para Word,equipado com IA 🤖, oferece mais de 100 recursos práticos para simplificar suas tarefas.
  1. Clique em Kutools Plus > Copiar Hiperlink.
    Copy Hyperlink button on the Kutools tab on the ribbon
  2. Na caixa de diálogo Copiar todos os hiperlinks para a área de transferência, selecione a opção desejada.
    Copy all hyperlinks to clipboard dialog box
  3. Cole os hiperlinks copiados onde desejar pressionando Ctrl + V.
  • Se você selecionar a opção Hiperlinks tanto o texto de exibição quanto o hiperlink serão copiados.
    Text with hyperlinks pasted
  • Se você selecionar a opção Endereços dos Hiperlinks apenas o endereço do hiperlink será copiado como texto simples.
    Hyperlinks addresses pasted
Kutools para Word é o complemento definitivo para o Word que simplifica seu trabalho e aprimora suas habilidades de processamento de documentos. Adquira agora!

Demonstração: Copiar Todos os Hiperlinks em um Documento do Word

Descubra a aba Kutools / Kutools Plus neste vídeo do Kutools for Word. Aproveite 100+ recursos e utilitários de IA permanentemente gratuitos. Faça o download agora!


Navegação e Edição em Abas para Múltiplos Documentos do Word/Pastas de Trabalho do Excel, Assim Como no Chrome e Edge!

Assim como navegar por várias páginas da web no Chrome, Safari e Edge, o Office Tab permite que você abra e gerencie vários documentos do Word ou pastas de trabalho do Excel em uma única janela do Word ou do Excel. Alternar entre documentos ou pastas de trabalho agora é simples com um clique em suas abas!

Experimente o Office Tab gratuitamente agora!


Artigos Relacionados:

Melhores Ferramentas de Produtividade para Office

Kutools para Word – Eleve sua experiência no Word com mais de 100 recursos incríveis!

🤖 Recursos de IA do Kutools: Assistente de IA / Assistente em Tempo Real / Super Polir (Preserva Formato) / Super Traduzir (Preserva Formato) / Redação por IA / Revisão por IA...

📘 Domínio de Documentos: Dividir Páginas / Mesclar Documentos / Exportar Seleção em Diversos Formatos (PDF/TXT/DOC/HTML...) / Converter em Lote para PDF...

Edição de Conteúdo: Localizar e Substituir em Lote em Vários Arquivos / Redimensionar Todas as Imagens / Transpor Linhas e Colunas da Tabela / Converter Tabela para Texto...

🧹 Limpeza Sem Esforço: Elimine Espaços Extras / Quebras de Seção / Caixas de Texto / Hiperlinks / Para mais ferramentas de remoção, acesse o grupo Remover...

Inserções Criativas: Inserir Separadores de Milhar / Caixas de Seleção / Botões de Rádio / QR Code / Código de Barras / Múltiplas Imagens / Descubra mais no grupo Inserir...

🔍 Seleções Precisas: Identifique Páginas Específicas / Tabelas / Formas / Parágrafos de Título / Melhore a navegação com mais recursos de Selecionar...

Melhorias Estrela: Navegue para Qualquer Localização / Insira Texto Repetitivo Automaticamente / Alterne Entre Janelas de Documentos /11 Ferramentas de Conversão...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Quer experimentar esses recursos? Baixe o Kutools para Word agora! 🚀
 

Melhores Ferramentas de Produtividade para Office

Kutools para Word – 100+ Ferramentas para Word