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

Renomear planilhas geralmente é aplicado em nosso trabalho do Excel, mas você já tentou renomear planilhas com base em valores de células? Claro, você pode renomear planilhas manualmente, mas aqui este tutorial apresenta alguns truques para 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 várias planilhas

Renomear planilhas com base em uma variedade de conteúdos de células com Renomear várias planilhas

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; neste caso, selecione a Célula A1. Veja a imagem:

2. Pressione Alt + F11 chaves para abrir Microsoft Visual Basic para Aplicações janela.

3. Clique inserção > Móduloe cole o código VBA abaixo no novo Módulo janela.

VBA: renomeie planilhas com base em valores de células específicos.

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 F5 chave para executar o código VBA. Então, todas as planilhas foram renomeadas para cada valor relativo da célula A1.

Renomear planilhas com base em uma célula específica com Renomear várias planilhas

Se você tem Kutools for Excel, você não precisa salvar o código VBA, você pode usar o Renomear várias planilhas recurso para renomear rapidamente todas as planilhas com base em suas células relativas.

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

1. Habilite a pasta de trabalho para a qual deseja renomear os nomes das planilhas.

2. Clique Kutools Plus > Planilha > Renomear planilhas. Veja a imagem:

3. Em seguida, na caixa de diálogo aberta, marque as folhas que deseja renomear em Fichas de trabalho painel e selecione um dos Opção de renomear você precisa, aqui vou substituir o nome da planilha e verificar Renomear planilhas com célula específicae selecione a célula pela qual você precisa renomear. Veja a imagem:

4. Clique Ok. Agora, as planilhas são renomeadas com conteúdos de células específicos.

Mas, às vezes, o que você precisa é renomear várias planilhas com base em um intervalo de valores de células, como mostrado abaixo na captura de tela, neste caso, você pode escolher método abaixo.

Renomear planilhas com base em uma variedade de conteúdos de células com Renomear várias planilhas

Com o Renomear várias planilhas of Kutools for Excel, você também pode renomear as folhas com base em um intervalo selecionado.

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

1. Clique Kutools Plus > Planilha > Renomear planilhas. Veja a imagem:

2. No Renomear várias planilhas caixa de diálogo, você precisa especificar as configurações como estas:

(1) Selecione as planilhas que você precisa renomear Lista de planilhas;

(2) Verifique De faixa específica opção e selecione os valores da célula que você precisa renomear com base;

(3) Especifique o Opções de renomeação, você pode checar Insira antes do nome da folha original, Inserir após o nome da folha originalou Substitua o nome da folha original, e você pode visualizar o resultado correspondente na caixa de diálogo.

3. Clique Ok, e então você pode ver que todas as planilhas selecionadas foram renomeadas com base nos valores de célula especificados.

Substitua o nome da folha original

Insira antes do nome da folha original

Inserir após o nome da folha original

Com o utilitário Rename Worksheets, você também pode renomear planilhas com um prefixo ou sufixo específico. Clique aqui para saber mais sobre Renomear Multiple Worksheets.

  Renomear várias folhas com base nos valores das células