Россия

Объект Worksheet

Дата публикации: 29.05.2015

Коллекция всех объектов Worksheet в указанной или активной рабочей книге. Каждый объект Worksheet представляет рабочий лист. Объект Worksheet — также член Sheets  коллекция. Sheets  коллекция содержит все листы в рабочей книге листы диаграммы и рабочие листы).

Методы объекта Worksheets

Метод

Описание

Add

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

Worksheets.Add (Before, After, Count, Type)

Параметры:

  • Before — Объект, который определяет лист, перед которым добавлен новый лист.

  • After — Объект, который определяет лист, после которого добавлен новый лист.

  • Count — Число листов, которые будут добавлены. Значение по умолчанию — 1.

  • Type — Определяет листовой тип. Может быть один из следующих XlSheetType константы: xlWorksheet, xlChart, xlExcel4MacroSheet, или xlExcel4IntlMacroSheet. Если Вы вставляете лист, основанный на существующем шаблоне, определите путь к шаблону. Значение по умолчанию — xlWorksheet.

Комментарии: Если Before и After оба опущены, новый лист вставляется перед активным листом.

Copy

Копирует лист в другое местоположение в рабочей книге.

Worksheets (1).Copy (Before, After)

Параметры:

  • Before — Лист, перед которым будет помещен скопированный лист.

  • After — Лист, после которого будет помещен скопированный лист.

Комментарии:

Вы не можете определить Before , если Вы определяете After и на оборот. Если Вы не определяете или Before , чем или After, Excel Microsoft создаст новую рабочую книгу, которая содержит скопированный лист

Этот пример копирует Sheet1, помещая копию после Sheet3.

Worksheets ( «Sheet1»).Copy After:=Worksheets ( «Sheet3»)

Delete

Удаляет объект.

Worksheets ( «Sheet1»). Delete

FillAcrossSheets

Копирует выбранный диапазон в ту же самую область на всех других рабочих листах в коллекции.

Worksheets ( «Sheet1»).FillAcrossSheets (Range, Type)

Параметры:

  • Range — Диапазон, который необходимо скопировать на рабочие листы в коллекции. Диапазон должен быть от рабочего листа в пределах коллекции.

  • Type — Определяет, как скопировать диапазон.

Этот пример заполняет диапазон A1:C5 на Sheet1, Sheet5, и Sheet7 с информационными наполнениями того же самого диапазона на Sheet1.

x = Array ( «Sheet1», «Sheet5», «Sheet7»)

Sheets (x).FillAcrossSheets _   

      Worksheets ( «Sheet1»).Range ( «A1:C5»)

Move

Перемещает лист в другое местоположение в рабочей книге.

Worksheets ( «Sheet1»).Move (Before, After)

Параметры:

  • Before-Лист, перед которым будет помещен перемещенный лист.

  • After — Лист, после которого будет помещен перемещенный лист.

Комментарии:

Вы не можете определить Before, если Вы определяете After и наоборот. Если Вы не определяете ни Before, ни After , Excel Microsoft создаст новую рабочую книгу, которая содержит перемещенный лист.

Этот пример перемещает Sheet1 после Sheet3 в активной рабочей книге.

Worksheets ( «Sheet1»).Move _

         after:=Worksheets ( «Sheet3»)

PrintOut

Печатает объект.

Worksheets ( «Sheet1»).PrintOut (From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName, IgnorePrintAreas)

Параметры:

  • From — Число страницы, чтобы запустить печатать. Если этот параметр опущен, печатается с первой страницы.

  • To — Число последней страницы, которая напечатает. Если этот параметр опущен, печатается до последней страницы.

  • Copies — Число печатаемых копий. Если этот параметр опущен, печатается одна копия.

  • Preview True, чтобы вызвать предварительный просмотр информации, выводимой на печать прежде, чем напечатать объект. False (или опущенный), чтобы напечатать объект немедленно.

  • ActivePrinter — Определяет имя активного принтера.

  • PrintToFile True, чтобы напечатать в файл. Если PrToFileName не определен, Excel Microsoft запрашивает пользователя имя выходного файла.

  • Collate True, чтобы сопоставить множественные копии.

  • PrToFileName — Если PrintToFile установлен в True, этот параметр определяет название файла, в который Вы хотите печатать.

  • IgnorePrintAreas True, чтобы проигнорировать области печати и напечатать весь объект.

Этот пример печатает активный лист.

ActiveSheet.PrintOut

PrintPreview

Показывает предварительный просмотр объекта, как это смотрелось бы когда печатается.

Worksheets ( «Sheet1»).PrintPreview (EnableChanges)

Параметры:

EnableChanges — Передайте Boolean значение, чтобы определить, может ли пользователь изменить края и другие опции Параметров станицы, доступные в предварительном просмотре информации, выводимой на печать

Этот пример отображает Sheet1 в предварительном просмотре информации, выводимой на печать.

Worksheets ( «Sheet1»).PrintPreview

Select

Выбирает объект.

Worksheets ( «Sheet1“).Select (Replace)

Параметры:

Replace (используемый только с листами). True , чтобы заменить текущий выбор указанным объектом. False , чтобы расширить текущий выбор, чтобы включать любые ранее выбранные объекты и указанный объект (выбор нескольких объектов).

 

Свойства объекта Worksheets

 

Свойство

Описание

Application

Когда используется без объектного спецификатора, это свойство возвращает объект Application , который представляет приложение Excel Microsoft.

Когда используется с объектным спецификатором, это свойство возвращает объект Application, который представляет создателя указанного объекта (Вы можете использовать это свойство с объектом Automation OLE, чтобы возвратить приложение того объекта).

Только для чтения.

Count

Возвращает значение Long , которое представляет число объектов в коллекции .е. число листов и диаграмм).

Creator

Возвращает 32-разрядное целое число, которое указывает приложение, в котором был создан этот объект. Только для чтения Long.

Worksheets (1).Creator

Комментарии: Если объект был создан в Excel Microsoft, это свойство возвращает строковый XCEL, который эквивалентен шестнадцатеричному числу 5843454C. Свойство Creator проектировано, чтобы использоваться в Excel Microsoft для Macintosh, где у каждого приложения есть четырехсимвольный код ассоциированного приложения. Например, у Excel Microsoft есть код ассоциированного приложения XCEL.

HPageBreaks

Возвращает коллекцию HPageBreaks, которая представляет горизонтальные разрывы страниц на листе. Только для чтения.

Worksheets (1). HPageBreaks

Item

Возвращает единственный объект из коллекции

Worksheets (1).Item (Index)

Параметры: Index — Название или индекс объекта.

Пример: Следующие две строки программы эквивалентны

ActiveWorkbook.Worksheets.Item (1)

ActiveWorkbook.Worksheets (1)

Parent

Возвращает родительский объект для указанного объекта. Только для чтения

Visible

Определяет видимость объекта

Возможные варианты: Valse и True

 Worksheets (1).Visible = True

VPageBreaks

Возвращает коллекцию VPageBreaks , которая представляет вертикальные разрывы страниц на листе. Только для чтения.

Worksheets (1). VPageBreaks

Этот пример отображает общее количество полноэкранных и область печати вертикальные разрывы страниц.

For Each pb in Worksheets (1).VPageBreaks

   If pb.Extent = xlPageBreakFull Then

       cFull = cFull + 1

   Else

       cPartial = cPartial + 1

   End If

Next

MsgBox cFull & “ полноэкранные разрывы страниц, “ & cPartial & _

   » разрывы страниц области печати «