VBA – Criar Novo Arquivo (Workbooks.Add)

Este tutorial demonstrará diferentes métodos para criar um novo arquivo Excel usando VBA.

Criar Novo Arquivo

Para criar uma novo arquivo simplesmente use Workbooks.Add:

Workbooks.Add

O novo Workbook é agora o ActiveWorkbook.

Você pode ver isto usando este código:

Sub AdicionarWorkbook()

Workbooks.Add
MsgBox ActiveWorkbook.Name

End Sub

Criar Novo Workbook & Atribuir a Objeto

Você pode usar o objeto ActiveWorkbook para se referir ao novo Workbook. Usando isto, você pode atribuir o novo Workbook a uma variável de objeto:

Dim wb as Workbook

Workbooks.Add
Set wb = ActiveWorkbook

Mas, é melhor/mais fácil atribuir o Workbook imediatamente a uma variável quando o Workbook é criado:

Dim wb As Workbook

Set wb = Workbooks.Add

Agora você pode fazer referência ao novo Workbook pelo nome de sua variável.

MsgBox wb.Name

Criar Novo Workbook e Salvar

Você também pode criar um novo Workbook e salvá-lo imediatamente:

Workbooks.Add.SaveAs Filename:="NovoWB"

Isto salvará o Workbook como um arquivo .xlsx em sua pasta padrão (ex. Meus Documentos). Em vez disso, você pode personalizar o SaveAs com nosso guia para salvar arquivos.

Agora você pode fazer referência ao Workbook pelo seu nome:

Workbooks("NovoWB.xlsx").Activate

Este código ativará o “NovoWB.xlsx”.

Criar Novo Arquivo e Adicionar Planilhas

Depois de criar um Workbook, você pode editá-lo. Aqui está apenas um exemplo para adicionar duas planilhas ao novo Workbook (assumindo que seja o ActiveWorkbook):

ActiveWorkbook.Worksheets.Add Count:=2