Como usar o nome de uma planilha como uma variável no Microsoft Excel 2007

Passo 1

Clique na guia "Desenvolvedor" e depois em "Visual Basic" para iniciar o editor VB. Clique no menu "Inserir" e depois em "Módulos" para inserir um novo módulo de código.

Passo 2

Um novo subprocedimento começa da seguinte maneira:

Sub sheetNames ()

Passo 3

Crie a variável "sheetName" para manter um registro dos nomes das planilhas e duas variáveis ​​que serão usadas como contadores da seguinte maneira:

Dim sheetName As String Dim xCntr Como Integer Dim shtCntr As Integer

Passo 4

Defina o conteúdo da variável "sheetName" com o nome da primeira página do seu livro do Excel, da seguinte maneira:

sheetName = "Sheet1"

Passo 5

Concede ao contador o valor de 1 que representa a primeira planilha:

shtCntr = 1

Passo 6

Use o código a seguir para criar um loop "For ... Loop" em cada planilha do seu livro do Excel e adicione o nome da planilha ao A1 usando a variável "sheetName":

Para xCntr = 0 a 2

Planilhas (sheetName) .Activate Range ("A1"). Selecione ActiveCell.FormulaR1C1 = sheetName Range ("A2"). Selecione shtCntr = shtCntr + 1 sheetName = "Sheet" & shtCntr

Próxima xCntr

Passo 7

Pressione "F5" para executar o procedimento. Em cada planilha, A1 conterá o nome da planilha.