Метод Sheets.Add (Excel)
Создает новый рабочий лист, лист диаграммы или макроса. Новый лист становится активным.
Синтаксис
expression. Add (Before, After, Count, Type)
выражение: переменная, представляющая объект Sheets.
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Before | Необязательный | Variant | Объект, указывающий лист, перед которым добавляется новый лист. |
After | Необязательный | Variant | Объект, указывающий лист, после которого добавляется новый лист. |
Count | Необязательный | Variant | Количество добавляемых листов. Значение по умолчанию — количество выбранных листов. |
Type | Необязательный | Variant | Определяет тип листа. Может быть одной из следующих констант XlSheetType : xlWorksheet, xlChart, xlExcel4MacroSheet или xlExcel4IntlMacroSheet. Если вставляется лист на основе существующего шаблона, укажите путь к шаблону. Значение по умолчанию — xlWorksheet. |
Возвращаемое значение
Значение Object, представляющее новый рабочий лист, лист диаграммы или макроса.
Примечания
Если оба параметра, Before и After, отсутствуют, новый лист вставляется перед активным листом.
Пример
В этом примере новый лист вставляется перед последним листом в активной книге.
ActiveWorkbook.Sheets.Add Before:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count)
В этом примере новый лист вставляется после последнего листа в активной книге и записывается возвращенная ссылка на объект в локальной переменной.
Dim sheet As Worksheet
Set sheet = ActiveWorkbook.Sheets.Add(After:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count))
Примечание.
В 32-разрядной версии Excel 2010 этот метод может создать не более 255 листов за один раз.
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Обратная связь
https://aka.ms/ContentUserFeedback.
Ожидается в ближайшее время: в течение 2024 года мы постепенно откажемся от GitHub Issues как механизма обратной связи для контента и заменим его новой системой обратной связи. Дополнительные сведения см. в разделеОтправить и просмотреть отзыв по