Returning an Object from a Collection (Excel)

La propiedad Item de una colección devuelve un único objeto de esa colección. En el ejemplo siguiente se establece la firstBook variable en un objeto Workbook que representa el primer libro de la colección Workbooks .

Set FirstBook = Workbooks.Item(1)

La propiedad Item es la propiedad predeterminada de la mayoría de las colecciones, por lo que se puede escribir la misma instrucción de una manera más precisa omitiendo la palabra clave Item.

Set FirstBook = Workbooks(1)

Para obtener más información sobre una colección específica, vea el tema de la Ayuda correspondiente a dicho conjunto o bien la propiedad Item de la colección.

Objetos con nombre

Aunque normalmente puede especificar un valor entero con la propiedad Item, puede ser más conveniente que se devuelva un objeto por su nombre. Para poder usar un nombre con la propiedad Item, debe asignar un nombre al objeto. Normalmente, esto se realiza estableciendo la propiedad Name del objeto. El siguiente ejemplo crea una hoja de cálculo con nombre en el libro activo y después hace referencia a la hoja por su nombre.

ActiveWorkbook.Worksheets.Add.Name = "A New Sheet" 
With Worksheets("A New Sheet") 
 .Range("A5:A10").Formula = "=RAND()" 
End With

Valores de índice predefinidos

Algunas colecciones tienen valores de índice predefinidos, que pueden emplearse para devolver objetos únicos. Cada valor de índice predefinido está representado por una constante. Por ejemplo, especifique una constante xlBordersIndex con la propiedad Item de la colección Borders para devolver un solo borde.

El ejemplo siguiente establece el borde inferior de las celdas A1:G1 de la Hoja1 como una línea doble.

Worksheets("Sheet1").Range("A1:A1"). _ 
 Borders.Item(xlEdgeBottom).LineStyle = xlDouble

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.