Заметка
Доступ к этой странице требует авторизации. Вы можете попробовать войти в систему или изменить каталог.
Доступ к этой странице требует авторизации. Вы можете попробовать сменить директорию.
Возвращает значение Variant , представляющее уникальное имя, идентифицирующее элементы со значением свойства SourceTypexlSourceRange, xlSourceChart, xlSourcePrintArea, xlSourceAutoFilter, xlSourcePivotTable или xlSourceQuery.
Синтаксис
expression. Источник
выражение Переменная, представляющая объект PublishObject .
Замечания
Если для свойства SourceType задано значение xlSourceRange, это свойство возвращает диапазон, который может быть определенным именем. Если свойство SourceType имеет значение xlSourceChart, xlSourcePivotTable или xlSourceQuery, это свойство возвращает имя объекта, например имя диаграммы, имя отчета сводной таблицы или имя таблицы запроса.
Пример
В этом примере определяется уникальное имя первой диаграммы (в первой книге), сохраненной в виде веб-страницы, а затем для логической переменной blnChartFound устанавливается значение True. Если никакие элементы в документе не были сохранены в качестве компонентов диаграммы, blnChartFound имеет значение False.
blnChartFound = False
For Each objPO In Workbooks(1).PublishObjects
If objPO.SourceType = xlSourceChart Then
strFirstPO = objPO.Source
blnChartFound = True
Exit For
End If
Next objPO
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.