Este tutorial demonstrará diferentes métodos para criar uma nova pasta de trabalho usando o VBA.
Criar nova pasta de trabalho
Para criar uma nova pasta de trabalho, basta usar Workbooks.Add:
1 | Workbooks.Add |
A pasta de trabalho recém-adicionada agora é a ActiveWorkbook.
Você pode ver isso usando este código:
123456 | Sub AddWB ()Workbooks.AddMsgBox ActiveWorkbook.NameEnd Sub |
Criar nova pasta de trabalho e atribuir ao objeto
Você pode usar o objeto ActiveWorkbook para se referir à nova pasta de trabalho. Usando isso, você pode atribuir a nova pasta de trabalho a uma variável de objeto:
1234 | Dim wb como pasta de trabalhoWorkbooks.AddDefinir wb = ActiveWorkbook |
Mas, é melhor / mais fácil atribuir a pasta de trabalho imediatamente a uma variável quando a pasta de trabalho é criada:
123 | Dim wb como pasta de trabalhoDefinir wb = Workbooks.Add |
Agora você pode fazer referência à nova pasta de trabalho por seu nome de variável.
1 | MsgBox wb.Name |
Criar nova pasta de trabalho e salvar
Você também pode criar uma nova pasta de trabalho e salvá-la imediatamente:
1 | Workbooks.Add.SaveAs Filename: = "NewWB" |
Isso salvará a pasta de trabalho como um arquivo .xlsx na pasta padrão (por exemplo, Meus documentos). Em vez disso, você pode personalizar o SaveAs com nosso guia para salvar pastas de trabalho.
Agora você pode se referir à pasta de trabalho pelo seu nome:
1 | Pastas de trabalho ("NewWB.xlsx"). Ative |
Este código irá ativar “NewWB.xlsx”.
Criar nova pasta de trabalho e adicionar planilhas
Depois de criar uma pasta de trabalho, você pode editá-la. Aqui está apenas um exemplo para adicionar duas planilhas à nova pasta de trabalho (assumindo que seja a ActiveWorkbook):
1 | ActiveWorkbook.Worksheets.Add Count: = 2 |