Clase ThreeDFormat (PowerPoint VBA)

La clase ThreeDFormat representa el formato tridimensional de una forma.

Set

Para usar una variable de clase ThreeDFormat, primero debe ser instanciado, por ejemplo

Dim tdf as ThreeDFormat
Set tdf = ActiveWindow.RangeFromPoint.ThreeD

Los siguientes procedimientos se pueden usar para establecer variables de clase ThreeDFormat : ChartFormat.ThreeD, Shape.ThreeD, ShapeRange.ThreeD y TextFrame2.ThreeD

Temas

Los siguientes procedimientos de esta clase se han agrupado y se describen en una página temática separada

Format with its procedures ContourColor, ContourWidth, ExtrusionColor, ExtrusionColorType, PresetThreeDFormat, SetThreeDFormat y Visible

Propiedades

BevelBottomDepth Devuelve o establece el alto del bisel inferior para el objeto ThreeDFormat especificado, en puntos. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.BevelBottomDepth =

BevelBottomInset Devuelve o establece el bajorrelieve del bisel inferior para el objeto ThreeDFormat especificado, en puntos. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.BevelBottomInset =

BevelBottomType Devuelve o establece el tipo de bisel inferior. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.BevelBottomType = msoBevelTypeMixed

BevelTopDepth Devuelve o establece el alto del bisel superior para el objeto ThreeDFormat especificado, en puntos. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.BevelTopDepth =

BevelTopInset Devuelve o establece el bajorrelieve del bisel superior para el objeto ThreeDFormat especificado, en puntos. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.BevelTopInset =

BevelTopType Devuelve o establece el tipo de bisel superior. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.BevelTopType = msoBevelTypeMixed

Depth Devuelve o establece la profundidad de extrusión de la forma. Lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).ThreeD.Depth = 50

FieldOfView Devuelve o establece el campo de vista de cámara para el objeto ThreeDFormat especificado, en grados. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.FieldOfView =

LightAngle Establece o devuelve el ángulo de luz que afecta a la forma cuyo formato tridimensional está representado por el objeto especificado. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.LightAngle =

Parent Devuelve el objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.ThreeD.Parent

Perspective Determina si la extrusión aparece en perspectiva. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.Perspective = msoTrue

PresetCamera Devuelve el tipo de cámara de efectos utilizado por el objeto ThreeDFormat especificado. Solo lectura.

Dim mpcPresetCamera As Office.MsoPresetCamera
mpcPresetCamera = ActiveWindow.RangeFromPoint.ThreeD.PresetCamera

PresetExtrusionDirection Devuelve la dirección en la que se aleja la extrusión de la forma extrudida (cara frontal de la extrusión). Solo lectura.

Dim mpePresetExtrusionDirection As Office.MsoPresetExtrusionDirection
mpePresetExtrusionDirection = ActivePresentation.Slides(1).Shapes(1).ThreeD.PresetExtrusionDirection

PresetLighting Devuelve o establece los efectos de iluminación utilizados por el objeto ThreeDFormat especificado. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.PresetLighting = msoLightRigMixed

PresetLightingDirection Devuelve o establece la posición de la fuente de luz en relación con la extrusión. Lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).ThreeD.PresetLightingDirection = msoPresetLightingDirectionMixed

PresetLightingSoftness Devuelve o establece la intensidad de luz de la extrusión. Lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).ThreeD.PresetLightingSoftness = msoPresetLightingSoftnessMixed

PresetMaterial Devuelve o establece el material de la superficie de extrusión. Lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).ThreeD.PresetMaterial = msoPresetMaterialMixed

ProjectText Especifica si el texto del objeto ThreeDFormat especificado gira con el objeto. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.ProjectText = msoTrue

RotationX Devuelve o establece el giro de la forma extruida alrededor del eje X, en grados. Lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).ThreeD.RotationX = 30

RotationY Devuelve o establece el giro de la forma extruida alrededor deleje Y, en grados. Lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).ThreeD.RotationY = 60

RotationZ Devuelve o establece el giro de los efectos de cámara para el objeto ThreeDFormat especificado, en grados. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.RotationZ =

Z Devuelve o establece la distancia que el objeto ThreeDFormat especificado se aleja de la placa de masa, en puntos. Lectura y escritura.

ActiveWindow.RangeFromPoint.ThreeD.Z =