Relação dos Nomes - VBA
Enviado: 19 Nov 2016 às 19:45
por Mafalda
Olá!
Possuo pasta de trabalho com dezenas de nomes e gostaria de extrair Relação dos Nomes (Gerenciador de Nomes) em planilha, mas não encontrei solução (VBA). Por favor, alguém ajude?
Abraços.
Re: Relação dos Nomes - VBA
Enviado: 19 Nov 2016 às 20:41
por gfranco
Boa noite
Cole o código num módulo e execute numa planilha vazia...
Sub nomes_dos_nomes()
On Error Resume Next
Dim i As Long
For i = 1 To 100
ActiveSheet.Cells(i, 1) = ThisWorkbook.Names(i).Name
ActiveSheet.Cells(i, 2) = ThisWorkbook.Names(i)
Next
MsgBox "concluido"
End Sub
Re: Relação dos Nomes - VBA
Enviado: 19 Nov 2016 às 20:47
por alexandrevba
Boa noite!!
Veja em:
https://www.vbatricksntips.com/list-all-name-range.html
Código: Selecionar todosSub List()
Dim nRng As Name
' Author: Dreams24
' Written for VBA Tricks and tips blog
' https://www.vbatricksntips.com
Sheet1.Cells(1, 1).Value = "Name"
Sheet1.Cells(1, 2).Value = "Range"
i = 2
' Loop through all Name ranges in workbook
For Each nRng In Names
Sheet1.Cells(i, 1).Value = nRng.Name
Sheet1.Cells(i, 2).Value = nRng
i = i + 1
Next nRng
MsgBox "All named ranges listed successfully", vbInformation
End Sub
Leia:
http://chandoo.org/wp/2010/09/20/show-all-names-excel/
Att
Relação dos Nomes - VBA
Enviado: 19 Nov 2016 às 22:53
por Mafalda
Pronto.
Valeu!