Devolver un objeto de una colección (Word)

El método Item devuelve un solo objeto de una colección. En el ejemplo siguiente se establece la docFirst variable en un objeto Document que representa el primer documento de la colección Documents .

Sub SetFirstDoc() 
    Dim docFirst As Document 
    Set docFirst = Documents.Item(1) 
End Sub

El método Item es el método predeterminado para la mayoría de las colecciones, por lo que puede escribirse la misma instrucción de forma más breve omitiendo la palabra clave Item.

Sub SetFirstDoc() 
    Dim docFirst As Document 
    Set docFirst = Documents(1) 
End Sub

Objetos denominados

Aunque normalmente puede especificarse un valor entero con el método Item, quizás sea más adecuado devolver un objeto por su nombre. En el siguiente ejemplo, se cambia la selección a un documento denominado Ventas.doc.

Sub ActivateDocument() 
    Documents("Sales.doc").Activate 
    MsgBox ActiveDocument.Name 
End Sub

En el siguiente ejemplo, se selecciona el texto señalado con el primer marcador del documento activo.

Sub SelectBookmark() 
    ActiveDocument.Bookmarks(1).Select 
    MsgBox Selection.Text 
End Sub

No todas las colecciones pueden indizarse por nombre. Para determinar los valores de índice de colección válidos, vea el tema del objeto de la colección.

Valores de índice predefinidos

Algunas colecciones tienen valores de índice predefinidos que pueden utilizarse para devolver un objeto. Cada valor de índice predefinido está representado por una constante. Por ejemplo, se especifica una constante WdBorderType con la propiedad Borders para devolver un objeto Border.

En el siguiente ejemplo, se agrega un borde de una línea de 0,75 puntos por debajo del primer párrafo de la selección.

Sub AddBorderToFirstParagraphInSelection() 
    With Selection.Paragraphs(1).Borders(wdBorderBottom) 
        .LineStyle = wdLineStyleSingle 
        .LineWidth = wdLineWidth300pt 
        .Color = wdColorBlue 
    End With 
End Sub

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.