Clase Line (Word VBA)

La clase Line representa una línea individual en un objeto Rectangle de tipo wdTextRectangle.

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos Line en una colección.

Dim shp As Rectangle: Set shp = 
Dim lin As Line
For Each lin In shp.Lines
	With lin
		
	End With
Next lin

Propiedades

Height Devuelve o establece el alto de una línea.

7 
Dim lngHeight As Long
lngHeight = lin.Height

Left Devuelve un valor de tipo Long que representa el número de píxeles desde el borde izquierdo de la página hasta el borde izquierdo de una línea.

7 
Dim lngLeft As Long
lngLeft = lin.Left

LineType Devuelve una constante wdLineType que indica si una línea es una línea de texto o una fila de tabla.

7 
Dim wltLineType As WdLineType
wltLineType = lin.LineType

Parent Devuelve un objeto Object que representa el objeto primario del objeto Line especificado.

7 
Dim objParent As Object
Set objParent = lin.Parent

Range Devuelve un objeto Range que representa la parte de un documento incluida en una línea.

7 
Dim rngRange As Range
Set rngRange = lin.Range

Rectangles Devuelve una colección Rectangles que representa una parte de texto o gráficos en una página de un documento.

7 
Dim rctsRectangles As Rectangles
Set rctsRectangles = lin.Rectangles

Top Devuelve un Long que representa el número de píxeles desde la parte superior de la página a la parte superior de una línea.

7 
Dim lngTop As Long
lngTop = lin.Top

Width Devuelve o establece el ancho, en puntos, de una línea.

7 
Dim lngWidth As Long
lngWidth = lin.Width

Lines.Count Devuelve un Long que representa el número de líneas de la colección.

Dim lns As Lines: Set lns =  
Dim lngCount As Long
lngCount = lns.Count

Lines.Parent Devuelve un objeto Object que representa el objeto primario del objeto Lines especificado.

Dim lns As Lines: Set lns =  
Dim objParent As Object
Set objParent = lns.Parent