Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Экспорт диаграммы в формате графического файла.
Синтаксис
expression. Export (bstr, varFilterName, varInteractive)
выражение: переменная, представляющая объект Chart.
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| bstr | Обязательный | String | Путь и имя экспортированного файла. |
| varFilterName | Необязательный | Variant | Независимое от языка имя графического фильтра, отображаемого в реестре ( HKLM\\SOFTWARE\Wow6432Node\Microsoft\Shared Tools\Graphics Filters). |
| varInteractive | Необязательный | Variant | Значение true , чтобы отобразить диалоговое окно, содержащее параметры фильтра, если таковые есть. Если параметр varInteractive имеет значение False, Project использует значения по умолчанию для фильтра. Значение по умолчанию — False. |
| bstr | Обязательный | String | |
| varFilterName | Необязательный | Variant | |
| varInteractive | Необязательный | Variant |
Возвращаемое значение
Boolean
Примечания
Метод Export перезаписывает существующий файл чтения и записи с тем же именем.
Пример
В следующем примере диаграмма экспортируется в виде файла переносимой сетевой графики (.png).
Sub ExportChart()
Dim chartShape As Shape
Dim reportName As String
Dim fileFormat As String
Dim fileName As String
fileFormat = "PNG"
fileName = "C:\Project\VBA\Samples\SimpleChart.png"
reportName = "Simple scalar chart"
Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
If (chartShape.Chart.Export(bstr:=filename, varFilterName:=fileFormat)) Then
Debug.Print "Exported chart: " & filename
End If
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.