Skip to main content

Como renomear planilhas com base nos valores de células no Excel?

Author: Sun Last Modified: 2025-06-04

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 good idea3

Renomear planilhas com base no conteúdo de um intervalo de células com Renomear Planilhas em Lote good idea3


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:

Select the cell to rename worksheet based on

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 Sub

4. 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.

all the worksheets have been renamed by each relative A1 cell values


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.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

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:

click Rename Worksheets of kutools

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:

set options in the dialog box

4. Clique em Ok. Agora as planilhas foram renomeadas com base no conteúdo da célula específica.

the sheets are renamed with specific cell contents

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.

rename multiple worksheets based on a range of cell values with kutools


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:

click Rename Worksheets feature of kutools

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.

set options in the dialog box

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

Replace original sheet name

Inserir antes do nome original da planilha

Insert before original sheet name

Inserir depois do nome original da planilha

Insert after original sheet name

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

🤖 Assistente AI do KUTOOLS: Revolucione a análise de dados com base em: Execução Inteligente | Gerar Código | Criar Fórmulas Personalizadas | Analisar Dados e Gerar Gráficos | Invocar Funções Aprimoradas
Recursos Populares: Encontrar, Destacar ou Marcar Duplicatas | Excluir Linhas em Branco | Combinar Colunas ou Endereço sem Perder Dados | Arredondar...
Super PROC: PROC com Múltiplos Critérios | PROC com Múltiplos Valores | Procura em várias planilhas | Correspondência Fuzzy...
Lista Suspensa Avançada: Crie rapidamente uma Lista Suspensa | Lista Suspensa Dependente | Lista Suspensa com Múltipla Seleção...
Gerenciador de Colunas: Adicionar um Número Específico de Colunas | Mover Colunas | Alternar Estado de Visibilidade das Colunas Ocultas | Comparar Intervalo & Colunas...
Recursos em Destaque: Grade de foco | Visualização de Design | Barra de fórmulas aprimorada | Gerenciador de Pasta de trabalho & Planilha | Biblioteca de AutoTexto | Selecionador de Data | Mesclar Dados | Criptografar/Descriptografar Células | Enviar Email por Lista | Super Filtro | Filtro Especial (filtrar negrito/itálico/tachado...)...
Top15 Conjuntos de Ferramentas:12 Ferramentas de Texto (Adicionar Texto, Excluir Caracteres Específicos, ...) | Mais de50 Tipos de Gráficos (Gráfico de Gantt, ...) | Mais de40 Fórmulas Práticas (Calcular a idade com base na data de nascimento, ...) |19 Ferramentas de Inserção (Inserir Código QR, Inserir Imagem a partir do Caminho, ...) |12 Ferramentas de Conversão (Converter em Palavras, Conversão de Moeda, ...) |7 Ferramentas de Mesclar & Dividir (Mesclar Linhas Avançado, Dividir Células, ...) | ... e muito mais

Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...


O Office Tab traz interface com abas para o Office e facilita muito o seu trabalho

  • Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas abas na mesma janela, em vez de abrir novas janelas.
  • Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!