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

Свойство Workbook.BuiltinDocumentProperties (Excel)

  • Статья

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

Синтаксис

expression. BuiltinDocumentProperties

Выражение Переменная, представляющая объект Workbook .

Замечания

Это свойство возвращает всю коллекцию встроенных свойств документа. Используйте метод Item , чтобы вернуть один член коллекции (объект DocumentProperty ), указав имя свойства или индекс коллекции (в виде числа).

Ссылаться на свойства документа либо по значению индекса, либо по имени. В следующем списке показаны доступные встроенные имена свойств документов:

  • Название
  • Subject
  • Автор
  • Ключевые слова
  • Comments
  • Шаблон
  • Последний автор
  • Номер редакции
  • Имя приложения
  • Дата последней печати
  • Дата создания
  • Время последней экономии
  • Общее время редактирования
  • Number of Pages
  • Количество слов
  • Число знаков
  • Безопасность
  • Категория
  • Формат
  • Manager
  • Организация
  • Количество байтов
  • Количество строк
  • Количество абзацев
  • Количество слайдов
  • Количество заметок
  • Количество скрытых слайдов
  • Количество мультимедийных клипов
  • База гиперссылок
  • Число символов (с пробелами)

Приложения-контейнеры не обязаны определять значения для каждого встроенного свойства документа. Если Microsoft Excel не определяет значение для одного из встроенных свойств документа, чтение свойства Value для этого свойства документа приводит к ошибке.

Так как метод Item является методом по умолчанию для коллекции DocumentProperties , следующие инструкции идентичны.

BuiltinDocumentProperties.Item(1) 
BuiltinDocumentProperties(1)

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

Пример

В этом примере имена встроенных свойств документа отображаются в виде списка на листе.

rw = 1 
Worksheets(1).Activate 
For Each p In ActiveWorkbook.BuiltinDocumentProperties 
    Cells(rw, 1).Value = p.Name 
    rw = rw + 1 
Next

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.