A renomeação de planilhas no Excel é feita na barra de tarefas abaixo das planilhas clicando duas vezes nelas, mas no VBA usamos o método de propriedade Planilhas ou Planilha para renomear a planilha, a sintaxe para renomear uma planilha no VBA é a seguinte Planilhas (“ Nome da Folha Antiga ”). Nome =“ Nome da Nova Folha ”.
Renomear planilha no Excel VBA
Todos nós já fizemos essa tarefa de renomear a planilha de acordo com nossa identidade ou de acordo com nossa conveniência, não é? Renomear não é ciência de foguete para dominar, mas se você é o codificador VBA, então deve conhecer esta tarefa de renomear a planilha. Como trabalhamos com planilhas usando seus nomes, é importante saber a importância dos nomes das planilhas na codificação VBA. Neste artigo, mostraremos como renomear a planilha usando a codificação Excel VBA.
Como renomear folha no VBA?
Alterar o nome da planilha não requer nenhuma habilidade especial. Precisamos apenas fazer referência ao nome da folha que estamos alterando, inserindo o nome da folha existente.
Por exemplo, se quisermos renomear a planilha nomeada como “Planilha 1”, precisamos chamar a planilha pelo seu nome usando o objeto Planilha.
Planilhas (“Folha1”)
Após mencionar o nome da planilha, precisamos selecionar a propriedade “Nome” para renomear o nome da planilha.
Planilhas (“Folha1”). Nome
Agora precisamos definir a propriedade Name para o nome de acordo com nosso desejo.
Planilhas (“Folha1”). Nome = “Novo Nome”
Assim, podemos renomear o nome da planilha no VBA usando a propriedade Name.
Nas seções seguintes do artigo, mostraremos a você cada vez mais exemplos de como alterar ou renomear a planilha.
Exemplos de renomear planilhas no Excel VBA
Abaixo estão os exemplos da folha de renomeação do VBA.
Exemplo # 1 - Alterar ou renomear planilha usando variáveis VBA.
Por exemplo, observe o código de exemplo abaixo.
Código:
Sub Rename_Example1 () Dim Ws As Worksheet Set Ws = Worksheets ("Sheet1") Ws.Name = "New Sheet" End Sub
No código acima, declarei a variável como planilha.
Dim Ws como planilha
Em seguida, defini a referência à variável como “Planilha1” usando o objeto planilhas.
Definir Ws = planilhas ("Planilha1")
Agora a variável “Ws” contém a referência da planilha “Planilha1”.
Agora, usando a variável “Ws”, renomeei a planilha como “Nova Planilha”.
Este código mudará o nome da “Folha1” para “Nova Folha”.
Se eu executar o código manualmente ou por meio da tecla de atalho F5, então, novamente, obteremos um erro Subscript Out of Range.
A razão pela qual recebemos este erro é que, na própria etapa anterior, já alteramos a planilha chamada “Planilha1” para “Nova Planilha”. Como não há mais um nome de planilha, “Planilha1” não está disponível, o VBA gera este erro.
Exemplo # 2 - Obtenha todos os nomes de planilhas em uma única planilha.
Podemos obter todos os nomes de planilhas da pasta de trabalho em uma única planilha. O código a seguir irá extrair todos os nomes da planilha.
Código:
Sub Renmae_Example2 () Dim Ws As Worksheet Dim LR As Long For Each Ws In ActiveWorkbook.Worksheets LR = Worksheets ("Main Sheet"). Cells (Rows.Count, 1) .End (xlUp) .Row + 1 Cells (LR, 1) .Selecione ActiveCell.Value = Ws.Name Next Ws End Sub
Este código irá extrair todos os nomes de planilhas disponíveis para a planilha chamada “Planilha Principal”.
Exemplo # 3 - Defina o nome permanente para a planilha do Excel usando VBA
Como trabalhamos com nomes de planilhas na codificação, é importante definir nomes permanentes para elas. Como definimos nomes permanentes para eles?
Por exemplo, observe o código abaixo.
Código:
Sub Rename_Example3 () Planilhas ("Planilha1"). Selecione End Sub
O código acima selecionará a Planilha1.
Se sua pasta de trabalho for usada por muitas pessoas, se alguém alterou o nome da planilha, obteremos o erro Subscrito fora do intervalo.
To avoid this, we can set the permanent name to it. To set the permanent name to follow the below steps.
Step 1: Select the sheet we need to set the permanent name to in Visual Basic Editor.
Step 2: Press the F4 key to see the Properties window.
Step 3: Under Name, Property Change the name to “New Name.”
As you can see, one name is showing as “Sheet1” and in a bracket, we can see the new name as “New Sheet.”
Now in coding, we will use the new name instead of an actual visible name.
Code:
Sub Rename_Example3() NewSheet.Select End Sub
Now come back to the worksheet window. We can still see the sheet name as “Sheet1” only.
Now I will change the sheet name to “Sales.”
Se eu executar o código usando a tecla F5 ou manualmente, ele ainda selecionará apenas a planilha chamada “Vendas”. Como demos um nome permanente a ele, ele ainda selecionará apenas a mesma página.
