Como renomear planilhas com base nos valores de células no Excel?
Renomear planilhas é geralmente aplicado em nosso trabalho no Excel, mas você já tentou renomear planilhas com base nos valores das células? Claro, você pode renomear as planilhas manualmente, mas aqui este tutorial apresenta alguns truques que podem renomear rapidamente várias planilhas com base nos valores das células, o que pode economizar seu tempo de trabalho.
Renomear planilhas com base em uma célula específica com VBA
Renomear planilhas com base em uma célula específica com Renomear Planilhas em Lote 
Renomear planilhas com base no conteúdo de um intervalo de células com Renomear Planilhas em Lote
Renomear planilhas com base em uma célula específica com VBA
Com o VBA abaixo, você pode renomear a planilha relativa com base em uma célula específica.
1. Selecione a célula na qual deseja renomear a planilha com base; neste caso, selecione a Célula A1. Veja a captura de tela:
2. Pressione as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.
3. Clique em Inserir > Módulo e cole o código VBA abaixo na nova janela Módulo.
VBA: Renomear planilhas com base nos valores de uma célula específica.
Sub RenameSheet()
'UpdatebyKutools20191129
Dim xWs As Worksheet
Dim xRngAddress As String
Dim xName As String
Dim xSSh As Worksheet
Dim xInt As Integer
xRngAddress = Application.ActiveCell.Address
On Error Resume Next
Application.ScreenUpdating = False
For Each xWs In Application.ActiveWorkbook.Sheets
xName = xWs.Range(xRngAddress).Value
If xName <> "" Then
xInt = 0
Set xSSh = Nothing
Set xSSh = Worksheets(xName)
While Not (xSSh Is Nothing)
Set xSSh = Nothing
Set xSSh = Worksheets(xName & "(" & xInt & ")")
xInt = xInt + 1
Wend
If xInt = 0 Then
xWs.Name = xName
Else
If xWs.Name <> xName Then
xWs.Name = xName & "(" & xInt & ")"
End If
End If
End If
Next
Application.ScreenUpdating = True
End Sub4. Pressione a tecla F5 para executar o código VBA. Em seguida, todas as planilhas terão sido renomeadas com base nos valores da célula A1 correspondente.
Renomear planilhas com base em uma célula específica com Renomear Planilhas em Lote
Se você tiver o Kutools para Excel, não precisará salvar o código VBA; você pode usar o recurso Renomear Planilhas em Lote para renomear rapidamente todas as planilhas com base em suas células correspondentes.
Após instalar gratuitamente o Kutools para Excel, faça o seguinte:
1. Ative a pasta de trabalho na qual deseja renomear os nomes das planilhas.
2. Clique em Kutools Plus > Planilha > Renomear Planilhas. Veja a captura de tela:
3. Na caixa de diálogo exibida, marque as planilhas que deseja renomear no painel Planilhas e selecione uma das Opções de Renomeação necessárias. Neste caso, vou substituir o nome da planilha, então marque Renomear planilhas com célula específica e selecione a célula que precisa ser usada para renomear. Veja a captura de tela:
4. Clique em Ok. Agora as planilhas foram renomeadas com base no conteúdo da célula específica.
Mas, às vezes, o que você precisa é renomear várias planilhas com base em um intervalo de valores de células, como mostrado na captura de tela abaixo. Nesse caso, você pode escolher o método abaixo.
Renomear planilhas com base no conteúdo de um intervalo de células com Renomear Planilhas em Lote
Com o Renomear Planilhas em Lote do Kutools para Excel, você também pode renomear as planilhas com base em um intervalo selecionado.
Após instalar gratuitamente o Kutools para Excel, faça o seguinte:
1. Clique em Kutools Plus > Planilha > Renomear Planilhas. Veja a captura de tela:
2. No diálogo Renomear Planilhas em Lote, você precisa especificar as configurações assim:
(1) Selecione as planilhas que deseja renomear na lista de Planilhas;
(2) Marque a opção Da Seleção e selecione os valores das células que deseja usar para renomear;
(3) Especifique as Opções de Renomeação; você pode marcar Inserir Antes do Nome Original, Inserir Depois do Nome Original ou Substituir o Nome Original, e você pode visualizar o resultado correspondente na caixa de diálogo.
3. Clique em Ok, e então você verá que todas as planilhas selecionadas foram renomeadas com base nos valores das células especificadas.
Substituir o nome original da planilha
Inserir antes do nome original da planilha
Inserir depois do nome original da planilha
Com a ferramenta Renomear Planilhas, você também pode renomear planilhas com um prefixo ou sufixo específico. Clique aqui para saber mais sobre Renomear Planilhas em Lote.
Renomear várias planilhas com base nos valores das células
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins