以图形文件格式导出图表。
语法
表达式。导出 (bstr、 varFilterName、 varInteractive)
expression:一个表示 Chart 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 | 
|---|---|---|---|
| bstr | 必需 | 字符串 | 导出的文件的路径和名称。 | 
| varFilterName | 可选 | Variant | 显示在注册表中的图形筛选器与语言无关的名称 ( HKLM\\SOFTWARE\Wow6432Node\Microsoft\Shared Tools\Graphics Filters) 。 | 
| varInteractive | 可选 | Variant | 如果为 True ,则显示包含特定于筛选器的选项(如果有)的对话框。 如果 varInteractive 为 False,则 Project 使用筛选器的默认值。 默认值为 False。 | 
| bstr | 必需 | 字符串 | |
| 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。