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.
Devolve ou define uma constante MsoPresetLightingDirection que representa a posição da origem de luz relativa à extrusão. Leitura/gravação.
Sintaxe
expressão. PresetLightingDirection
expressão Uma variável que representa um objeto ThreeDFormat .
Valor de retorno
MsoPresetLightingDirection
Comentários
O valor da propriedade PresetLightingDirection pode ser uma das constantes MsoPresetLightingDirection declaradas na biblioteca de tipos do Microsoft Office.
Os efeitos de iluminação definidos não serão visíveis se a extrusão tiver uma superfície de wireframe.
Exemplo
Este exemplo define que a extrusão da primeira forma na primeira página da publicação ativa seja estender até a parte superior da forma e que a luminosidade da extrusão venha da esquerda. Para que este exemplo funcione, a forma especificada tem de ser uma forma 3D.
Sub ExtrusionLighting()
With ActiveDocument.Pages(1).Shapes(1).ThreeD
.Visible = True
.SetExtrusionDirection msoExtrusionTop
.PresetLightingDirection = msoLightingLeft
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.