Método Shape.Export (PowerPoint)

Exporta uma forma, usando o filtro gráfico especificado, e salva o arquivo exportado sob o nome do arquivo especificado.

Sintaxe

expressão. Export(Parameters)

expressão Uma variável que representa um objeto Shape.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
PathName	Obrigatório	Cadeia de caracteres	O nome do arquivo a ser exportado e salvo em disco. Você pode incluir um caminho completo; se não o fizer, o Microsoft PowerPoint criará um arquivo na pasta atual. Especifica o quanto a sombra é deslocada horizontalmente, em pontos. Um valor positivo move a sombra para a direita; um valor negativo a move para a esquerda.
Filtro	Obrigatório	PpShapeFormat	O filtro gráfico a ser usado na criação do arquivo de imagem exportado.
ScaleWidth	Opcional	Long	A largura da imagem em pontos. Padrão é a largura do slide.
ScaleHeight	Opcional	Long	A altura da imagem em pontos. Padrão é a altura do slide.
Exportmode	Opcional	ppExportMode	O método de dimensionamento é usado na criação do arquivo de imagem exportado. Se não for especificado, as dimensões serão dimensionadas em relação ao tamanho do slide.

Enumerações

Enumeração PpShapeFormat (PowerPoint)

Nome	Valor	Descrição
ppShapeFormatBMP	3	Bitmap
ppShapeFormatEMF	5	Metafile aprimorado
ppShapeFormatGIF	0	GIF estático
ppShapeFormatJPG	1	JPG compactado
ppShapeFormatPNG	2	PNG sem perda
ppShapeFormatSVG	6	Gráfico de Vetor Escalonável
ppShapeFormatWMF	4	Windows Metafile

Enumeração ExportMode (PowerPoint)

Nome	Valor	Descrição
ppClipRelativeToSlide	2	Reservado para uso futuro
ppRelativeToSlide	1	Dimensiona a imagem em relação às dimensões do slide
ppScaleToFit	3	Reservado para uso futuro
ppScaleXY	4	Reservado para uso futuro

Comentários

O PowerPoint usa o filtro gráfico especificado para salvar cada forma individual. Os nomes das formas exportadas e salvas em disco são determinados como o argumento PathName que deve incluir a extensão de arquivo correspondente para o filtro gráfico escolhido.

Os parâmetros ScaleWidth e ScaleHeight são usados para dimensionar o tamanho da imagem exportada em relação às dimensões do slide. Por exemplo, se uma forma quadrada simples de 1" for criada em um slide, ela será medida como 72x72 pontos no Modelo de Objeto. Quando exportado sem usar nenhum fator de escala, a escala padrão de 1:1 é aplicada e o PowerPoint usará 96DPI para criar uma imagem de 96x96 pixels. Se um fator de escala de 2x for usado conforme mostrado no exemplo 2 abaixo, a imagem exportada será de 192x192 pixels.

Se o slide e/ou a forma não estiver totalmente baixado, esse método falhará e ocorrerá um erro. Para obter mais informações sobre os Documentos Parciais, consulte Trabalhar com Documentos Parciais.

Ao exportar do PowerPoint no macOS, os arquivos devem ser criados na pasta de área restrita do Office ou na pasta de área restrita do PowerPoint:

/Users/[username]/Library/Group Containers/UBF8T346G9.Office /Users/[username]/Library/Containers/com.microsoft.Powerpoint/Data

Se você tentar usar um caminho fora desses locais de área restrita e o erro de automação for gerado.

Disponibilidade

O filtro SVG está disponível no Windows versão 2302 e posterior.

O método Export está disponível no macOS na versão 16.82 e posterior.

Exemplo

O exemplo a seguir exporta todas as formas SVG na apresentação ativa como arquivos SVG para a pasta Imagens do usuário. O valor ppRelativeToSlide padrão é usado para o parâmetro ExportMode , o que significa que a imagem exportada será

For Each oSld In ActivePresentation.Slides
    For Each oShp In oSld.Shapes
        If oShp.Type = msoGraphic Then
            FileName = oShp.Name & ".svg"
            PathToFolder = Environ("USERPROFILE") & "\Pictures\"
            oShp.Export PathToFolder & FileName, ppShapeFormatSVG
        End If
    Next
Next 

O exemplo a seguir usa o recurso de escala para exportar o objeto selecionado em um tamanho relativo ao slide. Nesse caso, o slide é um tamanho padrão de 16:9 que é de 960x540 pontos. A imagem exportada é criada com o dobro do tamanho de seu tamanho no slide.

PathToFile = Environ("USERPROFILE") & "\Pictures\export.png"

With ActiveWindow.Selection.ShapeRange(1)
        .Export PathToFile, ppShapeFormatPNG, 1920, 1080, ppRelativeToSlide
End With

Confira também

Objeto Shape

PageSetup.SlideHeight

PageSetup.SlideWidth

Trabalhar com documentos parciais

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.