Como criar uma nova pasta de trabalho do excel usando vba?

Para criar uma nova pasta de trabalho usando VBA, você precisa usar o método “Workbooks.Add” . Ao usar esse método, ele insere uma nova pasta de trabalho (sem salvá-la) e a ativa. Isso funciona como quando você pressiona o atalho de teclado CONTROL + N. Você também pode usar um modelo para inserir uma nova pasta de trabalho.

Crie uma nova pasta de trabalho usando VBA

Certifique-se de adicionar a guia Desenvolvedor à faixa de opções para inserir esse código no VBE .

1. Digite a palavra-chave “Fichários” para se referir ao objeto fichário.
2. Depois disso, digite um ponto final.
3. Aqui você terá uma lista de propriedades e métodos para selecionar.
4. Selecione “Adicionar” nesta lista ou digite-o.

 Sub vba_new_workbook() Workbooks.Add End Sub

Adicione uma nova pasta de trabalho usando um modelo

Como eu disse, usamos o método Workbooks.Add. Com este método, há um argumento (opcional) que você pode usar para se referir a um arquivo como modelo.

 Workbook.Add Template (Optional)

Suponha que você tenha uma pasta de trabalho e queira que a nova pasta de trabalho seja exatamente igual a ela, você pode consultá-la como um modelo.

 Workbooks.Add Template:="C:UsersDellDesktopbook1.xlsx"

Ao executar o código acima, ele pega a referência “book1” que fica salva na área de trabalho. A pasta de trabalho modelo contém 6 planilhas e a nova pasta de trabalho contém exatamente o mesmo número de planilhas.

Além disso, você pode usar os argumentos padrão para decidir que tipo de planilha deseja ter na nova pasta de trabalho.

1. xlWBATCHart : planilha de gráfico
2. xlWBAExcel4IntlMacroSheet: planilha de macro versão 4
3. xlWBAExcel4MacroSheet : planilha de macro (internacional) versão 4
4. xlWBATPlanilha : planilha

Crie uma nova pasta de trabalho do Excel e salve-a

Quando você cria uma nova pasta de trabalho, o Excel a abre, mas não a salva com o método Adicionar. Então, para isso você precisa usar o método SaveAs.

 Sub vba_create_workbook() Workbooks.Add ActiveWorkbook.SaveAs "C:usersdelldesktopmyBook.xlsx" End Sub

1. Primeiro, use workbook.add para criar uma nova pasta de trabalho.
2. Em seguida, consulte a pasta de trabalho ativa e use o método SaveAs.
3. No método SaveAs, use o caminho onde deseja salvar a pasta de trabalho com o nome do arquivo.
4. No final, execute o código .