Método ShapeRange.CanvasCropLeft (Word)
Recorta un porcentaje del ancho de un lienzo de dibujo desde el lado izquierdo del lienzo.
Sintaxis
expresión. CanvasCropBottom( _Increment_ )
expresión requerida. Variable que representa un objeto ShapeRange.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Increment | Obligatorio | Single | La cantidad en puntos porcentuales del ancho del lienzo de dibujo que desea que quede después de que el lienzo haya sido recortado. Si se introduce 0,9 como el incremento, se recorta el diez por ciento del ancho del lienzo desde la izquierda. Si se introduce 0,1, se recorta noventa por ciento del ancho del lienzo desde la izquierda. |
Ejemplo:
En este ejemplo se recorta un veinticinco por ciento del ancho del lienzo de dibujo desde el lado izquierdo del primer lienzo del documento activo, suponiendo que la primera forma del documento activo es un lienzo de dibujo. De lo contrario, tendrá que agregar un lienzo de dibujo al documento mediante el método AddCanvas.
Sub CropCanvasLeft()
Dim shpCanvas As Shape
Set shpCanvas = ActiveDocument.Shapes(1)
shpCanvas.CanvasCropLeft Increment:=0.75
End Sub
Consulte también
Objeto de colección ShapeRange
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.