Criar uma nova pasta de trabalho

Para criar uma nova pasta de trabalho no Visual Basic, você usa o método Add. O procedimento a seguir cria uma nova pasta de trabalho. O Microsoft Excel atribui automaticamente à pasta de trabalho o nome PastaN, onde N é o próximo número disponível. A nova pasta de trabalho se transforma na pasta de trabalho ativa.

Sub AddOne()
    Workbooks.Add
End Sub

Uma maneira melhor de criar uma nova pasta de trabalho é atribuí-la a uma variável de objeto. No exemplo seguinte, o objeto Workbook retornado pelo método Add é atribuído a uma variável de objeto, newBook. Em seguida, várias propriedades de newBook são definidas. Você pode facilmente controlar a nova pasta de trabalho usando a variável de objeto.

Sub AddNew()
Set NewBook = Workbooks.Add
    With NewBook
        .Title = "All Sales"
        .Subject = "Sales"
        .SaveAs Filename:="Allsales.xls"
    End With
End Sub