Application.EditCopyPicture - метод (Project)

Копирует активное представление как рисунок или OLE-объект либо экспортирует активное представление в GIF-файл изображения.

Синтаксис

выражение. EditCopyPicture( _Object_, _ForPrinter_, _SelectedRows_, _FromDate_, _ToDate_, _FileName_, _ScaleOption_, _MaxImageHeight_, _MaxImageWidth_, _MeasurementUnits_ )

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Object	Необязательный	Логический	True , если представление должно быть скопировано как объект OLE. Значение по умолчанию — False.
ForPrinter	Необязательный	Long	Указывает, куда скопировать представление. Может быть одной из следующих констант PjCopyPictureFor: pjScreen, pjPrinter или pjGIF. Если свойство Object имеет значение true, метод ForPrinter игнорируется. Значение по умолчанию — pjScreen.
ВыбранныеСтроки	Необязательный	Логический	True, если Project копирует только выбранные строки. Значение False , если программа копирует все видимые строки.
FromDate	Необязательный	Variant	Начало шкалы времени для скопированного рисунка. Если свойство объектаимеет значение True, то значение FromDate игнорируется. Если указано значение FromDate , а значение ToDate — нет, Project будет использовать последнюю введенную дату для окончания шкалы времени. Если это приведет к отрицательному отрезку времени, программа будет использовать самую позднюю дату шкалы времени, видимую в активном представлении. Значение по умолчанию — это самая ранняя дата, отображаемая в активном представлении шкалы времени.
ToDate	Необязательный	Variant	Окончание шкалы времени для скопированного рисунка. Если свойство Object имеет значение True, значение ToDate игнорируется. Если указано значение ToDate , а значение FromDate — нет, Project будет использовать последнюю введенную дату для начала шкалы времени. Если это создает отрицательный интервал времени, программа будет использовать самую раннюю дату шкалы времени, видимую в активном представлении. Значение по умолчанию — это самая поздняя дата шкалы времени, отображаемая в активном представлении.
FileName	Необязательный	String	Имя файла GIF-изображения. Если ForPrinter имеет значение pjGIF, требуется FileName . Если свойство Object имеет значение True или ForPrinter не имеет значения pjGIF,имя файла игнорируется.
ScaleOption	Необязательный	Long	Указывает, как обрабатывать изображение активного представления, если оно больше, чем MaxImageWidth на MaxImageHeight (по умолчанию 22 дюйма на 22 дюйма). Значение по умолчанию: pjCopyPictureKeepRange. Может быть одной из констант PjCopyPictureScaleOption .
MaxImageHeight	Необязательный	Double	Указывает максимальную высоту рисунка. Допустимый диапазон MaxImageHeight составляет от 2,54 до 55,88 см. Значение по умолчанию: 22 дюйма.
MaxImageWidth	Необязательный	Double	Указывает максимальную ширину рисунка. Допустимый диапазон MaxImageWidth составляет от 2,54 до 55,88 см. Значение по умолчанию: 22 дюйма.
Единицы измерения	Необязательный	Variant	Длинный. Указание единиц измерения. Значение по умолчанию — pjInches. Может быть одной из констант PjMeasurementUnits .

Возвращаемое значение

Boolean

Примечания

При использовании метода EditCopyPicture без аргументов выводится диалоговое окно "Копировать рисунок ".

Пример

В следующем примере создается копия представления диаграммы Ганта в виде файла Test.gif и сохраняется в корневой папке.

Sub Edit_CopyPicture() 
    'Activate the Gantt Chart view 
    ViewApply Name:="&Gantt Chart" 
    EditCopyPicture ForPrinter:=pjGIF, FileName:="C:\Test.gif" 
End Sub

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

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