VB AExcel - Aliste os nomes de todas as ABAS da sua Planilha - List workbook defined names

| Blog Office VBA | Blog Excel | Blog Access |

O código a seguir fará uma lista dos nomes de todas as pastas de trabalho em uma nova planilha. 

Sub ShowNames()

Dim x As Worksheet

Set x = Worksheets.Add

 

Dim nm As Name

Dim i As Long

 

i = 1

 

For Each nm In Names

  Cells(i, 1) = nm.Name

  Cells(i, 2) = "'" & nm.RefersTo

  i = i + 1

Next nm

 

End Sub

Tags: VBA, Excel, ABA, name, rename, list