Ir para o conteúdo principal

Como adicionar nova planilha com nome específico no Excel?

Às vezes, você deseja criar uma nova planilha e nomeá-la automaticamente com um nome específico no Excel. Neste artigo, mostraremos dois métodos para adicionar uma nova planilha com nome específico na pasta de trabalho atual, bem como criar uma planilha com nome específico em uma nova pasta de trabalho no Excel.

Adição automática de nova planilha com nome específico na pasta de trabalho atual com código VBA
Adicionar automaticamente nova planilha com nome específico em uma nova pasta de trabalho com o Kutools para Excel


Adição automática de nova planilha com nome específico na pasta de trabalho atual com código VBA

Você pode adicionar uma nova planilha com determinado nome no final da pasta de trabalho atual com o seguinte código VBA.

1. Pressione outro + F11 simultaneamente para abrir o Microsoft Visual Basic para Aplicações janela.

2. No Microsoft Visual Basic para Aplicações janela, clique em inserção > Módulo.

3. Copie e cole o código VBA abaixo no Módulo janela.

Código VBA: adicionar nova planilha com nome específico no final da pasta de trabalho atual

Sub CreateSheet()
'Updated by ExtendOffice 20181009
    Dim xName As String
    Dim xSht As Object
    On Error Resume Next
    xName = InputBox("Please enter a name for this new sheet ", "Kutools for Excel")
    If xName = "" Then Exit Sub
        Set xSht = Sheets(xName)
        If Not xSht Is Nothing Then
            MsgBox "Sheet cannot be created as there is already a worksheet with the same name in this workbook"
            Exit Sub
            End If
            Sheets.Add(, Sheets(Sheets.count)).Name = xName
        End Sub

4. Pressione F5 chave para executar o código. No surgimento Kutools for Excel caixa de diálogo, insira um nome para esta folha e clique no OK botão. Veja a imagem:

Em seguida, uma nova planilha é criada com nome específico e localizada no final da pasta de trabalho atual.


Adicionar automaticamente nova planilha com nome específico em uma nova pasta de trabalho com o Kutools para Excel

Nesta seção, apresentaremos o Criar planilhas de sequência utilidade de Kutools for Excel. Com este utilitário, você pode adicionar facilmente uma nova planilha com um nome específico em uma nova pasta de trabalho.

Antes de aplicar Kutools for Excel, Por favor baixe e instale primeiro.

1. Para adicionar uma nova planilha com um nome específico, você precisa digitar este nome em uma célula com antecedência. E então clique Kutools Plus > Planilha > Criar planilhas de sequência.

2. No Criar planilhas de sequência caixa de diálogo, selecione Folha de trabalho em branco no Planilha Base lista suspensa, selecione Datanum intervalo opção e especifique a célula que contém o nome da planilha e, finalmente, clique no OK botão. Veja a imagem:

Em seguida, uma nova planilha com este nome específico de uma célula é criada em uma nova pasta de trabalho imediatamente.

Notas:

1. Se você deseja criar várias planilhas novas com nomes específicos ao mesmo tempo, insira esses nomes nas células uma a uma e, em seguida, selecione essas células no Dados em um intervalo caixa.
2. Você também pode criar planilhas de sequência de números de série ou uma lista personalizada com este Criar planilhas de sequência Utilitário. Veja a imagem:

  Se você quiser ter um teste gratuito (30 dias) deste utilitário, por favor clique para fazer o downloade, em seguida, aplique a operação de acordo com as etapas acima.

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 (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi, this does not properly account for user clicking cancel. It still creates worksheet.
This comment was minimized by the moderator on the site
Hi
The code has been updated with the problem solving. Please have a try and thanks for your comment.
This comment was minimized by the moderator on the site
Hi, I'm quite new to VBA, the above code works great for adding a new spreadsheet and renaming it, however I would then like it to automatically copy and paste the contents on my 'template' sheet into the new sheet? Can anybody help please?

Thanks
This comment was minimized by the moderator on the site
Good day,
Please try the below VBA code. Hope it can help. Thanks for your comment.

Sub CreateSheet()
Dim xName As String
Dim xSht As Object
Dim xNWS As Worksheet
On Error Resume Next
xName = Application.InputBox("Please enter a name for this new sheet ", "Kutools for Excel")
If xName = "" Then Exit Sub
Set xSht = Sheets(xName)
If Not xSht Is Nothing Then
MsgBox "Sheet cannot be created as there is already a worksheet with the same name in this workbook"
Exit Sub
End If
ActiveSheet.Copy after:=Sheets(Sheets.count)
Set xNWS = Sheets(Sheets.count)
xNWS.Name = xName
End Sub
This comment was minimized by the moderator on the site
Thank you for your reply crystal! I have it working now :)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations