Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Exporta um gráfico num formato de ficheiro de gráfico.
Sintaxe
expressão. Exportar (bstr, varFilterName, varInteractive)
expressão Uma variável que representa um objeto Chart.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| bstr | Obrigatório | String | O caminho e o nome do ficheiro exportado. |
| varFilterName | Opcional | Variant | O nome independente do idioma do filtro gráfico, tal como aparece no registo ( HKLM\\SOFTWARE\Wow6432Node\Microsoft\Shared Tools\Graphics Filters). |
| varInteractive | Opcional | Variant | Verdadeiro para apresentar a caixa de diálogo que contém as opções específicas do filtro, se existirem. Se varInteractive for Falso, o Project utiliza os valores predefinidos para o filtro. O valor padrão é False. |
| bstr | Obrigatório | String | |
| varFilterName | Opcional | Variant | |
| varInteractive | Opcional | Variant |
Valor de retorno
Boolean
Comentários
O método Exportar substitui um ficheiro de leitura/escrita existente com o mesmo nome.
Exemplo
O exemplo seguinte exporta o gráfico como um ficheiro Portable Network Graphics (.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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.