ShapeRange.CanvasCropTop-Methode (Word)

Schneidet einen prozentualen Anteil der Höhe eines Zeichenbereichs vom oberen Rand des Zeichenbereichs ab.

Syntax

Ausdruck. CanvasCropBottom( _Increment_ )

Ausdruck: Erforderlich. Eine Variable, die ein ShapeRange-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Increment	Erforderlich	Single	Der prozentuale Anteil der Höhe eines Zeichenbereichs, der nach dem Zuschneiden des Zeichenbereichs verbleiben soll. Bei Eingabe von 0,9 als Schrittweite werden zehn Prozent der Höhe des Zeichenbereichs vom oberen Rand abgeschnitten. Bei Eingabe von 0,1 werden 90 Prozent der Höhe des Zeichenbereichs vom oberen Rand abgeschnitten.

Beispiel

In diesem Beispiel werden 25 Prozent der Höhe des Zeichenbereichs vom oberen Rand des ersten Zeichenbereichs im aktiven Dokument abgeschnitten, sofern die erste Form im aktiven Dokument ein Zeichenbereich ist. Andernfalls müssen Sie dem Dokument mithilfe der AddCanvas-Methode einen Zeichenbereich hinzufügen.

Sub CropCanvasTop() 
 Dim shpCanvas As Shape 
 
 Set shpCanvas = ActiveDocument.Shapes(1) 
 shpCanvas.CanvasCropTop Increment:=0.75 
End Sub

Siehe auch

ShapeRange-Auflistungsobjekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.