Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает коллекцию DocumentProperties , представляющую все встроенные свойства документа для указанной книги. Только для чтения.
Синтаксис
expression. BuiltinDocumentProperties
выражение Переменная, представляющая объект Workbook .
Замечания
Это свойство возвращает всю коллекцию встроенных свойств документа. Используйте метод Item , чтобы вернуть один член коллекции (объект DocumentProperty ), указав имя свойства или индекс коллекции (в виде числа).
Ссылаться на свойства документа либо по значению индекса, либо по имени. В следующем списке показаны доступные встроенные имена свойств документов:
- Название
- Subject
- Автор
- Ключевые слова
- Comments
- Шаблон
- Последний автор
- Номер редакции
- Имя приложения
- Дата последней печати
- Дата создания
- Время последней экономии
- Общее время редактирования
- Number of Pages
- Количество слов
- Число знаков
- Безопасность
- Категория
- Формат
- Директор
- Организация
- Количество байтов
- Количество строк
- Количество абзацев
- Количество слайдов
- Количество заметок
- Количество скрытых слайдов
- Количество мультимедийных клипов
- База гиперссылок
- Число символов (с пробелами)
Приложения-контейнеры не обязаны определять значения для каждого встроенного свойства документа. Если 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 и обратная связь.