Cómo: devolver objetos de colecciones

Importante

Este artículo se ha traducido con traducción automática; vea la declinación de responsabilidades. Para su referencia, puede encontrar la versión en inglés de este artículo aquí.

Item método devuelve un objeto de una colección. El siguiente ejemplo se establece la

firstPres

variable a un Presentation objeto que representa la presentación uno.

Set firstPres = Presentations.Item(1)

El método Item es el método predeterminado para la mayor parte de las colecciones, por lo que se puede escribir la misma instrucción con mayor precisión si se omite la palabra clave Item.

Set firstPres = Presentations(1)

Para obtener más información acerca de una colección determinada, vea el tema de Ayuda de dicha colección o el método Item de la colección.

Objetos denominados

Aunque normalmente puede especificar un valor entero utilizando el método Item , puede ser más conveniente devolver un objeto por su nombre. Muchos objetos se les asignan nombres generados automáticamente cuando se crean. Por ejemplo, la primera diapositiva que se crea automáticamente llamará "Diapositiva1". Si las dos primeras formas que cree un rectángulo y una elipse, sus nombres por defecto será "Rectángulo 1" y "Óvalo 2". Desea asignar un objeto un nombre más significativo para hacer más fácil hacer referencia a él. Normalmente, esto se realiza mediante el establecimiento Name del objeto propiedad. En el ejemplo siguiente se establece un nombre significativo para una diapositiva y se agrega. A continuación, puede utilizar el nombre en lugar del número de índice para hacer referencia a la diapositiva.

ActivePresentation.Slides.Add(1, 1).Name = "Home Page Slide"
With ActivePresentation.Slides("Home Page Slide")
    .FollowMasterBackground = False
    .Background.Fill.PresetGradient _
        msoGradientDiagonalDown, 1, msoGradientBrass
End With

Valores de índice predefinidos

Algunas colecciones tienen valores de índice que puede utilizar para devolver objetos únicos predefinidos. Cada valor de índice predefinido está representado por una constante. Por ejemplo, especificar una constante PpTextStyleType con el método Item de la TextStyles colección para devolver un estilo de texto.

En el ejemplo siguiente se establece los márgenes de las áreas de texto en las diapositivas de la presentación activa.

With ActivePresentation.SlideMaster _
        .TextStyles(ppBodyStyle).TextFrame
    .MarginBottom = 50
    .MarginLeft = 50
    .MarginRight = 50
    .MarginTop = 50
End With

Nota

Declinación de responsabilidades de traducción automática: Este artículo se ha traducido con un sistema informático sin intervención humana. Microsoft ofrece estas traducciones automáticas para que los hablantes de otros idiomas distintos del inglés puedan disfrutar del contenido sobre los productos, los servicios y las tecnologías de Microsoft. Puesto que este artículo se ha traducido con traducción automática, es posible que contenga errores de vocabulario, sintaxis o gramática.