Compartilhar via


Como: Adicionar planilhas para pastas de trabalho usando a automação de projeto de Visual Studio

Este exemplo adiciona uma nova planilha para uma pasta de trabalho do Excel de Microsoft Office existente que está aberta no designer de Visual Studio.

Aplicável a: As informações neste tópico se aplicam a projetos de nível de documento para Excel 2007 e Excel 2010. Para obter mais informações, consulte Recursos disponíveis pelo aplicativo do Office e o tipo de projeto.

Exemplo

Sub AddWorksheet()
    ' Find the Office project.
    Dim vstProject As Project = DTE.Solution.Item(1)

    ' Find the Excel workbook.
    Dim docItem As ProjectItem = _
        vstProject.ProjectItems.Item("ExcelWorkbook1.xlsx")

    ' Activate the Solution Explorer window.
    Dim solExpl As Window = _
        DTE.Windows.Item(Constants.vsWindowKindSolutionExplorer)
    solExpl.Activate()

    ' Find and select the Excel workbook.
    Dim uiHier As UIHierarchy = solExpl.Object

    ' The path follows the pattern
    ' SolutionName\ProjectName\WorkbookName.
    Dim item As UIHierarchyItem = _
        uiHier.GetItem("ExcelWorkbook1\ExcelWorkbook1.xlsx")
    item.Select(vsUISelectionType.vsUISelectionTypeSelect)

    ' Execute the shortcut menu command to add a new worksheet.
    Dim commandGuid As String = _
        "{AE97F291-448D-4F9F-93A8-B0D2B78475A4}"

    ' Set commandID to 1 to add a new worksheet, 2 to add a new chart.
    Dim commandID As Integer = 1 
    Dim customIn As Object
    Dim customOut As Object
    DTE.Commands.Raise(commandGuid, commandID, customIn, customOut)
End Sub

Compilando o código

Este exemplo tem os seguintes requisitos:

  • Uma pasta de trabalho do Excel denominado ExcelWorkbook1 em um projeto denominado ExcelWorkbook1 a abrir no designer de Visual Studio. Não deve haver nenhum outros projetos na solução.

  • Quando você cria o projeto ExcelWorkbook1, certifique-se de que você não selecionar Create directory for solution na Novo projeto caixa de diálogo.

Programação robusta

Adicione o código a um módulo no ambiente de desenvolvimento integrado (IDE) Macros de Visual Studio.

Limpar o Always show solution opção na Opções caixa de diálogo. Para acessar a caixa de diálogo, no Ferramentas menu, clique em Opçõese selecione o projetos e soluções pasta e clique em Geral.

Consulte também

Tarefas

Como: Alterar as propriedades do Excel usando a automação de projeto de Visual Studio

Outros recursos

Extensibilidade em projetos do Office

Demonstra Passo a passo: Criar um novo projeto do Office usando a automação de projeto de Visual Studio

Extensibilidade em projetos do Office