Propriedade ThreeDFormat.PresetThreeDFormat (Publisher)

Devolve uma constante MsoPresetThreeDFormat que representa o formato de extrusão predefinido. Somente leitura.

Sintaxe

expressão. PresetThreeDFormat

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

Valor de retorno

MsoPresetThreeDFormat

Comentários

O valor da propriedade PresetThreeDFormat pode ser uma das constantes MsoPresetThreeDFormat declaradas na biblioteca de tipos do Microsoft Office.

Cada formato de extrusão predefinido contém um conjunto de valores predefinidos para as diversas propriedades da extrusão. Se a extrusão tiver um formato personalizado em vez de um formato predefinido, essa propriedade retornará msoPresetThreeDFormatMixed.

Os valores desta propriedade correspondem às opções (numeradas da esquerda para a direita, de cima para baixo) apresentadas quando seleciona o botão Estilo 3D na barra de ferramentas Formatação .

Use o método SetThreeDFormat para definir o formato de extrusão predefinido.

Exemplo

Este exemplo define o formato de extrusão da primeira forma na primeira página da publicação ativa como Estilo 3D 12 se a forma tiver inicialmente um formato de extrusão personalizado. Para que este exemplo funcione, a forma especificada tem de ser uma forma 3D.

Sub SetPreset3D() 
 With ActiveDocument.Pages(1).Shapes(1).ThreeD 
 If .PresetThreeDFormat = msoPresetThreeDFormatMixed Then 
 .SetThreeDFormat msoThreeD12 
 End If 
 End With 
End Sub

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.