'---------------------------------------------------------'

Excel VBA – Manipulação de Range Names

Nesta aula, exploraremos **12 macros úteis** para trabalhar com **Range Names no Excel VBA**, incluindo como retornar endereços, utilizar range nomeado em outra planilha e lidar com nomes ocultos.

📌 Macros VBA – Enumeração e Função

🔹 1️⃣ Retornar o Endereço de um Range Nomeado

📌 **O que faz?** Exibe um alerta com o **endereço** de um range nomeado dentro da planilha.

Sub RetornarEnderecoRange() 
    Dim rng As Range 
    ******* Macros Completas so na area de Membros
End Sub 

🔹 2️⃣ Exibir Todos os Range Names

📌 **O que faz?** Lista no console **todos os nomes de intervalo** existentes na pasta de trabalho.

Sub ListarRangeNames() 
    Dim nome As Name 
    For Each nome In ActiveWorkbook ?? 
        ******* Macros Completas so na area de Membros
    Next nome
End Sub 

🔹 3️⃣ Copiar Valores de um Range Nomeado para Outra Planilha

📌 **O que faz?** Transfere **os valores** de um Range Nomeado para uma célula específica de outra planilha.

Sub CopiarRangeParaOutraPlanilha() 
    Dim rng As Range 
   ******* Macros Completas so na area de Membros
End Sub 

🔹 4️⃣ Exibir Todos os Range Names Ocultos

📌 **O que faz?** Identifica e exibe os **nomes de intervalo ocultos** existentes na pasta de trabalho.

Sub MostrarNomesOcultos() 
    Dim ?? 
    For Each ?? In ActiveWorkbook.Names 
       ******* Macros Completas so na area de Membros 
    Next ??
End Sub 

🔹 5️⃣ Tornar Range Name Oculto Visível

📌 **O que faz?** Altera a propriedade de um nome oculto, tornando-o **visível novamente**.

Sub TornarNomeVisivel() 
      ******* Macros Completas so na area de Membros 
End Sub 

🔹 6️⃣ Criar um Novo Range Name via VBA

📌 **O que faz?** Cria **dinamicamente** um novo nome de intervalo e associa-o a um conjunto de células.

Sub CriarRangeName() 
    ******* Macros Completas acesse a area de Membros 
End Sub 

🔹 7️⃣ Apagar um Nome de Range

📌 **O que faz?** Remove **definitivamente** um nome de intervalo específico da pasta de trabalho.

Sub ApagarNomeRange() 
    ******* Macros Completas acesse a area de Membros 
End Sub 

🔹 8️⃣ Checar se um Range Name Existe

📌 **O que faz?** Verifica se um nome de intervalo **existe ou não** na pasta de trabalho.

Function RangeNameExiste(N??? As String) As Boolean 
    On Error Resume Next 
   ******* Macros Completas acesse a area de Membros 
    On Error GoTo 0 
End Function 

🔹 9️⃣ Alterar o Range Referenciado por um Nome

📌 **O que faz?** Modifica a **área de referência** de um nome de intervalo já existente.

Sub AlterarReferenciaNome() 
     ******* Macros Completas acesse a area de Membros  
End Sub 

🔹 🔟 Retornar Apenas os Range Names Visíveis

📌 **O que faz?** Lista no console **somente os nomes visíveis** na pasta de trabalho.

Sub ListarNomesVisiveis() 
    Dim ?? As Name 
    For Each ?? In ActiveWorkbook.Names 
        ******* Macros Completas acesse a area de Membros 
    Next ?? 
End Sub 

🔹 1️⃣1️⃣ Aplicar um Range Name a Outra Planilha

📌 **O que faz?** Utiliza **dados de um Range Nomeado** em uma planilha diferente.

Sub AplicarRangeOutraPlanilha() 
    Dim rng As Range 
   ******* Macros Completas acesse a area de Membros  
End Sub 

🔹 1️⃣2️⃣ Remover Todos os Range Names Ocultos

📌 **O que faz?** Apaga **todos os nomes de intervalo ocultos** existentes na planilha.

Sub RemoverNomesOcultos() 
    Dim ?? As ??
    For Each ?? In ActiveWorkbook.Names 
       ******* Macros Completas acesse a area de Membros  
    Next ??
End Sub 

📩 **Professor: Expedito Marcondes**

Dúvidas? Entre em contato: suportecursovba@gmail.com