방법: Visual Studio 프로젝트 자동화를 사용하여 통합 문서에 워크시트 추가

아티클
08/10/2011

이 예제에서는 Visual Studio 디자이너에 열려 있는 기존의 Microsoft Office Excel 통합 문서에 새 워크시트를 추가합니다.

적용 대상: 이 항목의 정보는 Excel 2007 및 Excel 2010의 문서 수준 프로젝트에 적용됩니다. 자세한 내용은 Office 응용 프로그램 및 프로젝트 형식에 따라 사용 가능한 기능을 참조하십시오.

예제

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

코드 컴파일

이 예제에는 다음 사항이 필요합니다.

Visual Studio 디자이너에 열려 있는 ExcelWorkbook1이라는 프로젝트에 ExcelWorkbook1이라는 Excel 통합 문서가 있어야 합니다. 솔루션에 다른 프로젝트는 없어야 합니다.
ExcelWorkbook1 프로젝트를 만들 때 새 프로젝트 대화 상자에서 솔루션용 디렉터리 만들기를 선택하지 말아야 합니다.