Método Sheets.Add (Excel)
Cria uma nova planilha, gráfico ou planilha macro. A nova planilha se torna a planilha ativa.
Sintaxe
expressão. Adicionar (Antes, Depois, Contar, Digitar)
expressão Uma variável que representa um objeto Sheets.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Before | Opcional | Variant | Um objeto que especifica a planilha antes da qual a nova planilha será adicionada. |
After | Opcional | Variant | Um objeto que especifica a planilha depois após a qual a nova planilha será adicionada. |
Count | Opcional | Variant | O número de planilhas a serem adicionadas. O valor padrão é o número de planilhas selecionadas. |
Type | Opcional | Variant | Especifica o tipo de planilha. Pode ser uma das seguintes constantes XlSheetType : xlWorksheet, xlChart, xlExcel4MacroSheet ou xlExcel4IntlMacroSheet. Se você estiver inserindo uma planilha com base em um modelo existente, especifique o caminho para o modelo. O valor padrão é xlWorksheet. |
Valor de retorno
Um valor de objeto que representa a nova planilha, gráfico ou planilha macro.
Comentários
Se Before e After forem omitidos, a nova planilha será inserida antes da planilha ativa.
Exemplo
Este exemplo insere uma nova planilha antes da última planilha da pasta de trabalho ativa.
ActiveWorkbook.Sheets.Add Before:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count)
Este exemplo insere uma nova planilha após a última planilha na pasta de trabalho ativa e captura a referência de objeto retornado em uma variável local.
Dim sheet As Worksheet
Set sheet = ActiveWorkbook.Sheets.Add(After:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count))
Observação
No Excel 2010 de 32 bits, este método não pode criar mais de 255 planilhas ao mesmo tempo.
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.