Ir para o conteúdo principal

Como criar uma lista dinâmica de nomes de planilhas no Excel?

Se você tiver várias planilhas em uma pasta de trabalho e quiser criar uma lista dinâmica de todos os nomes de planilhas em uma nova planilha na pasta de trabalho, como pode fazer isso? Agora, este tutorial apresenta alguns truques para concluir rapidamente esta missão no Excel.

Crie uma lista dinâmica de nomes de planilhas com Definir nome e fórmula

Crie uma lista dinâmica de nomes de planilhas com código VBA

Crie uma lista dinâmica de nomes de planilhas com Kutools para Excel boa ideia 3

Exiba uma lista dinâmica de nomes de planilhas com Kutools para Excel boa ideia 3


1. Selecione uma célula em uma folha em branco, aqui eu seleciono A1 e clique em Fórmulas > Definir o Nome. veja a imagem:
doc-dynamic-worksheetname-list-1

2. Em seguida, no Novo nome diálogo, tipo Lençóis no Nome caixa de texto (você pode alterar conforme necessário) e digite esta fórmula = SUBSTITUIR (GET.WORKBOOK (1), "[" & GET.WORKBOOK (16) & "]", "") na caixa de texto Refere-se a. Veja a imagem:
doc-dynamic-worksheetname-list-2

3. Clique OK. Vá para a célula selecionada (A1) e digite esta fórmula = INDEX (Folhas, LINHAS ($ A $ 1: $ A1)) (A1 é a célula na qual você digita esta fórmula, "Planilhas" é o nome que você definiu na Etapa 2) nela e arraste a alça de preenchimento automático para baixo até #REF! parece.
doc-dynamic-worksheetname-list-3

Dica: Se houver planilhas removidas ou adicionadas, você precisa ir para A1 e pressionar a tecla Enter e, em seguida, mover a alça de preenchimento automático novamente.
doc-dynamic-worksheetname-list-4


Se você deseja criar uma lista dinâmica de nomes de planilhas que podem ser vinculados a cada planilha, você pode usar o código VBA.

1. Crie uma nova planilha e renomeie-a como Índice. Veja a imagem:

doc-dynamic-worksheetname-list-5       doc-dynamic-worksheetname-list-6

2. Clique com o botão direito no nome da folha de índice e selecione Ver código no menu de contexto. Veja a imagem:
doc-dynamic-worksheetname-list-7

3. Na janela pop-up, copie e cole o código VBA abaixo.

VBA: Crie uma lista dinâmica de nomes de planilhas.

Private Sub Worksheet_Activate()
	'Updateby20150305
	Dim xSheet As Worksheet
	Dim xRow As Integer
	Dim calcState As Long
	Dim scrUpdateState As Long
	Application.ScreenUpdating = False
	xRow                       = 1
	With Me
		.Columns(1).ClearContents
		.Cells(1, 1) = "INDEX"
		.Cells(1, 1).Name = "Index"
	End With
	For Each xSheet In Application.Worksheets
		If xSheet.Name <> Me.Name Then
			xRow                     = xRow + 1
			With xSheet
				.Range("A1").Name = "Start_" & xSheet.Index
				.Hyperlinks.Add anchor: = .Range("A1"), Address: = "", _
				SubAddress:             = "Index", TextToDisplay: = "Back to Index"
			End With
			Me.Hyperlinks.Add anchor: = Me.Cells(xRow, 1), Address: = "", _
			SubAddress: = "Start_" & xSheet.Index, TextToDisplay: = xSheet.Name
		End If
	Next
	Application.ScreenUpdating = True
End Sub

4. Clique Execute or F5 para executar o VBA, agora uma lista dinâmica de nomes de planilhas é criada.
doc-dynamic-worksheetname-list-8

Dica:

1. Quando a planilha da pasta de trabalho for excluída ou inserida, a lista de nomes da planilha será alterada automaticamente.

2. Você pode clicar no nome da planilha da lista de nomes para ir para a planilha.

Com os dois métodos acima não são convenientes o suficiente, se você estiver interessado em um novo utilitário, você pode ir a seguir dois métodos que podem tornar esta tarefa mais fácil.


 Se você deseja apenas listar rapidamente todos os nomes de planilhas da pasta de trabalho e vinculá-los às planilhas originais, você pode usar Kutools for Excel'S Criar lista de nomes de planilhas.

Kutools for Excel, com mais de 300 funções úteis, tornam seus trabalhos mais fáceis. 

Depois de instalação grátis Kutools para Excel, faça o seguinte:

1. Clique Kutools Plus > Planilha > Criar lista de nomes de planilhas. Veja a imagem:

doc nome da planilha dinâmica 17

2. No Criar lista de nomes de planilhas diálogo:

 doc lista de nomes de planilha dinâmica 2
(1) Verifique o estilo de índice que você precisa em Estilos de índice de folha seção;
(2) Nomeie a nova folha de índice digitando os dados em Especifique o nome da folha para o índice da folha caixa de texto;
(3) Especifique o local em que você colocará a folha de índice adicionada no Insira o índice da folha em Lista;
(4) Se você deseja exibir os nomes das folhas em uma única lista, selecione 1 coluna em Exibindo o índice da folha em Lista.

3. Clique Ok. Agora você pode ver que os nomes das planilhas estão listados.
doc kutools criar lista de folhas 3

Dicas:

1. Você pode clicar no nome da folha para mudar rapidamente para a folha original.

2. Os nomes da lista ou da folha não podem ser alterados dinamicamente com a inserção ou exclusão das folhas.

3. Na verdade, você também pode criar uma lista de botões para vincular a planilha relativa, basta verificar Contém botões e macros na caixa de diálogo. veja screeshshot:
doc kutools criar lista de folhas 4

Clique aqui para saber mais sobre Criar lista de nomes de planilhas.


Se você com Kutools for Excel, você também pode usar o Navegação utilitário para exibir os nomes das planilhas vinculáveis ​​em um painel

Depois de instalação grátis Kutools para Excel, faça o seguinte:

1. Clique Kutools > Navegação. Clique Livro e Folha de Trabalho para mostrar a pasta de trabalho e a planilha, e você pode selecionar uma pasta de trabalho, então suas planilhas serão exibidas no Navegação painel. Veja a imagem:
painel de navegação 1 do documento   

Dica:

Quando houver planilhas excluídas ou adicionadas, você pode clicar no botão Atualizar painel de navegação 2 do documento no Navegaçãon painel para atualizar os nomes das planilhas.

Clique aqui para obter mais informações sobre navegação.

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para obter o recurso que você mais precisa...

Descrição


Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
Comments (13)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hallo. hoe zou ik dit kunnen doen om hetzelfde te doen maar met een welbepaade cel van verschillende werkbladen. Bv. een leeg tabblad. mijn andere werkbladen hebben allemaal dezelfde lay-out, maar in iedere cel een andere tekst. Nu zou ik graag in mijn leeg tabblad in Cel A1 de gegevens terugvinden van tabblad1 cel B3. Maar dan zou ik graag in Cel A2 de gegevens terugvinden van tabblad 2 cel 3. En zou naar beneden en dit in een beweging. We kunnen allemaal afzonderlijk doen, maar als er 500 werkbladen zijn, is dit onmogelijk.

Merci voor den input.
This comment was minimized by the moderator on the site
Hi, I guess you want to list all same cells across multiple sheets, if so, there are two tutorials may help you. Please visit:
How to reference same cell from multiple worksheets in Excel?
How to create a list from same cells across multiple sheets in Excel?
Hope it is helpful.
This comment was minimized by the moderator on the site
Em português brasileiro, GET.WORKBOOK é identificado como uma função no Gerenciador de Nomes para criar o nome "Sheets", mas ao referenciar "Sheets" numa célula, aparece o erro "#NOME?". Tentei várias vezes, inclusive com a sugestão de traduzir GET.WORKBOOK para OBTER.LIVRO mas não funcionou.
This comment was minimized by the moderator on the site
Hi, try this: =SUBSTITUIR(INFO.PASTA.TRABALHO(1),"["&INFO.PASTA.TRABALHO(16)&"]","")
This comment was minimized by the moderator on the site
Thanks for this helpful info. I created a dynamic list with VBA code in the Index tab. I found that it only updates when I click back to the Index tab, though. Is there a way to ensure it auto updates as soon as a new tab is created? I refer to the tab names elsewhere in the workbook and others will be using it so I'm trying to make it seamless. Thank you!
This comment was minimized by the moderator on the site
Sorry, I do not find that code can finish your job.
This comment was minimized by the moderator on the site
Or you can simply rightClick either the left or right tab-horizontal-scroll arrow at the bottomLeft, and then click the worksheet name (from the simple vertical list) that you want to jump to.
This comment was minimized by the moderator on the site
Just what I needed and worked perfectly. Thank you!
This comment was minimized by the moderator on the site
Defining the name "Sheets" in the define name DOES NOT WORK. The "refers to" box will not save the formula as typed and converts it to a text string.
This comment was minimized by the moderator on the site
how can I use this code to create the list of worksheets in horizontal order instead of vertical? is it possible?
This comment was minimized by the moderator on the site
Thank you. It is very useful. :D
This comment was minimized by the moderator on the site
How can i remove the links to each sheets and how to not include the "sheet1" and "Index" sheet? Private Sub Worksheet_Activate() 'Updateby20150305 Dim xSheet As Worksheet Dim xRow As Integer Dim calcState As Long Dim scrUpdateState As Long Application.ScreenUpdating = False xRow = 1 With Me .Columns(1).ClearContents .Cells(1, 1) = "INDEX" .Cells(1, 1).Name = "Index" End With For Each xSheet In Application.Worksheets If xSheet.Name Me.Name Then xRow = xRow + 1 With xSheet .Range("A1").Name = "Start_" & xSheet.Index .Hyperlinks.Add anchor: = .Range("A1"), Address: = "", _ SubAddress: = "Index", TextToDisplay: = "Back to Index" End With Me.Hyperlinks.Add anchor: = Me.Cells(xRow, 1), Address: = "", _ SubAddress: = "Start_" & xSheet.Index, TextToDisplay: = xSheet.Name End If Next Application.ScreenUpdating = True End Sub
This comment was minimized by the moderator on the site
How would I go about editing this code to include a checkbox to the left of the link that I could use to hide rows on a cover sheet? Also how could I insert a row on the worksheets below A1 to have the return to index link show up there?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations