Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Una colección de todos los ColorScheme objetos de Microsoft Publisher. Cada objeto ColorScheme representa una combinación de colores, que es un conjunto de colores que se utilizan en una publicación.
Observaciones
Utilice el recuento propiedad para devolver el número de combinaciones de colores disponibles en Publisher.
Utilice la propiedad Item para devolver un esquema de color específico de la colección ColorSchemes. El argumento Index de la propiedad Item puede ser el número o el nombre de la combinación de colores o una constante PbColorScheme .
Utilice el nombre propiedad para devolver un nombre de esquema de color.
Ejemplo
En el ejemplo siguiente se muestra el número de combinaciones de colores.
Sub CountColorSchemes()
MsgBox Application.ColorSchemes.Count
End Sub
En el siguiente ejemplo se establece la combinación de colores de la publicación activa a flor silvestre.
Sub SetColorScheme()
ActiveDocument.ColorScheme _
= ColorSchemes.Item(pbColorSchemeWildflower)
End Sub
El ejemplo siguiente muestra en un cuadro de texto de todas las combinaciones de colores disponibles en Publisher.
Sub ListColorShemes()
Dim clrScheme As ColorScheme
Dim strSchemes As String
For Each clrScheme In Application.ColorSchemes
strSchemes = strSchemes & clrScheme.Name & vbLf
Next
ActiveDocument.Pages(1).Shapes.AddTextbox( _
Orientation:=pbTextOrientationHorizontal, _
Left:=72, Top:=72, Width:=400, Height:=500).TextFrame _
.TextRange.Text = strSchemes
End Sub
Propiedades
Vea también
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.