Propiedad PictureFormat.CropLeft (Word)
Devuelve o establece el número de puntos que se recortará el lado izquierdo de la imagen especificada o un objeto OLE. Lectura y escritura único.
Sintaxis
expresión. CropLeft
Expresión Variable que representa un objeto 'PictureFormat'.
Comentarios
El recorte se calcula con relación al tamaño original de la imagen. Por ejemplo, si inserta una imagen que originalmente tiene un ancho de 100 puntos, cambia la escala de modo que sea de 200 y, a continuación, se establece la propiedad CropLeft en 50, se recortarán 100 puntos (no 50) de la parte izquierda de la imagen.
Ejemplo:
En este ejemplo se recortan 20 puntos del lado izquierdo de la forma tres del documento activo. Para que el ejemplo funcione, la forma tres debe ser una imagen o un objeto OLE.
ActiveDocument.Shapes(3).PictureFormat.CropLeft = 20
En este ejemplo se recorta el porcentaje definido por el usuario en la parte izquierda de la forma especificada, independientemente de si se le ha ajustado la forma o no. Para que el ejemplo funcione, la forma seleccionada debe ser una imagen o un objeto OLE.
Dim dblPercent As Double
Dim shapeCrop As Shape
Dim sngHeight As Single
Dim sngCrop As Single
dblPercent = Val(InputBox("What percentage do you want " _
& "to crop off the left of this picture?"))
Set shapeCrop = _
Selection.ShapeRange(1)
With shapeCrop.Duplicate
.ScaleHeight 1, True
sngHeight = .Height
.Delete
End With
sngCrop = sngHeight * dblPercent / 100
shapeCrop.PictureFormat.CropLeft = sngCrop
Consulte también
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.
Comentarios
https://aka.ms/ContentUserFeedback.
Próximamente: A lo largo de 2024 iremos eliminando gradualmente GitHub Issues como mecanismo de comentarios sobre el contenido y lo sustituiremos por un nuevo sistema de comentarios. Para más información, vea:Enviar y ver comentarios de