Поделиться через

Практическое руководство. Добавление рабочих книг с помощью автоматизации проектов Visual Studio

  • Статья

Обновлен: Ноябрь 2007

Применение

Сведения в данном разделе относятся только к указанным проектам Visual Studio Tools for Office и версиям приложений Microsoft Office.

Тип проекта

  • Проекты уровня документа

Версия Microsoft Office

  • Excel 2007

  • Excel 2003

Дополнительные сведения см. в разделе Доступность функций по типам приложений и проектов.

В этом примере добавляется новый лист в существующую книгу Microsoft Office Excel, открытую в конструкторе Visual Studio.

Пример

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

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

    ' 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.xls")
    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

Компиляция кода

Для этого примера требуется следующее:

  • Книга Excel с именем ExcelWorkbook1 и проект с именем ExcelWorkbook1, открытые в конструкторе Visual Studio. Не должно быть других открытых проектов или решений.

  • Рабочая книга в проекте должна иметь формат рабочей книги Excel 97-2003 (.xls).

  • При создании проекта ExcelWorkbook1 убедитесь, что в диалоговом окне Новый проект не выбран параметр Создать каталог для решения.

Отказоустойчивость

В интегрированной среде разработки макросов Visual Studio добавьте код в модуль.

Снимите флажок Всегда показывать решение в диалоговом окне Параметры. Чтобы открыть это диалоговое окно, в меню Сервис выберите пункт Параметры, выберите папку Проекты и решения и щелкните Общие.

См. также

Задачи

Пошаговое руководство. Создание нового проекта Office с помощью автоматизации проектов Visual Studio

Практическое руководство. Изменение свойств Excel с помощью автоматизации проектов Visual Studio

Основные понятия

Общие сведения о расширяемости проектов Visual Studio Tools for Office

Другие ресурсы

Расширяемость проекта в инструментах Visual Studio для Office