Uma macro do Excel para incluir e nomear uma nova planilha
Uma das mais simples automações relacionadas com a planilha que você pode aplicar com uma macro no Excel está adicionando e nomear uma nova planilha. Veja como essa macro funciona e como usá-lo.
Como as obras de macro
Quando você ler através das linhas do código, você vai ver que esta macro é relativamente intuitiva:
Sub Macro1 () 'Passo 1: Diga Excel o que fazer se errorOn Error GoTo MyError'Step 2: Adicionar uma folha eo nome itSheets.AddActiveSheet.Name = _WorksheetFunction.Text (Now (), "m-d-aaaa h_mm_ss
am / pm ") Exit Sub'Step 3: Se aqui, um erro happened- dizer a userMyError: MsgBox" Já existe uma folha chamada que "End Sub.
Você deve antecipar que, se você der a nova folha de um nome que já existe, um erro poderia ocorrer. Então, no Passo 1, a macro informa ao Excel para saltar imediatamente para a linha que diz MyError (na Etapa 3) se houver um erro.
Passo 2 utiliza o método Add para adicionar uma nova folha. Por padrão, a folha é chamado Folhaxx, Onde xx representa o número da folha. Você dá a folha de um novo nome, alterando a propriedade Nome do objeto ActiveSheet. Neste caso, você está nomeando a planilha com a data e hora atual.
Tal como acontece com as pastas de trabalho, cada vez que você usar o VBA para adicionar uma nova folha, a folha recém-adicionada torna-se automaticamente a folha activa. Finalmente, no Passo 2, em atenção que a macro sai do procedimento. Tem que fazer isso para que ele não acidentalmente entrar em Passo 3 (que entra em jogo somente se ocorrer um erro).
Passo 3 notifica o usuário que o nome da folha já existe. Mais uma vez, este passo deve ser ativado somente se ocorrer um erro.
Como usar o macro
Para implementar essa macro, você pode copiar e colá-lo em um módulo padrão:
Ative o Editor do Visual Basic pressionando Alt + F11.
direita; clique no nome do projeto / pasta de trabalho na janela do projeto.
Escolha Inserir-Module.
Digite ou cole o código no módulo recém-criado.