Nota
O acceso a esta páxina require autorización. Pode tentar iniciar sesión ou modificar os directorios.
O acceso a esta páxina require autorización. Pode tentar modificar os directorios.
Devuelve el nombre del archivo de textura personalizada para el relleno especificado. Solo lectura.
Sintaxis
expresión. TextureName
expresión Variable que representa un objeto FillFormat .
Valor devuelto
Cadena
Observaciones
Esta propiedad es de sólo lectura. Utilice el método UserTextured para establecer el archivo de textura del relleno.
Ejemplo
En este ejemplo se agrega una elipse a myDocument. Si la forma uno de myDocument tiene un relleno con textura definido por el usuario, la nueva elipse tendrá el mismo relleno que la forma uno. Si la forma uno tiene otro tipo de relleno, la nueva elipse tendrá un relleno de mármol verde.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
Set newFill = .AddShape(msoShapeOval, 0, 0, 200, 90).Fill
With .Item(1).Fill
If .Type = msoFillTextured And _
.TextureType = msoTextureUserDefined Then
newFill.UserTextured .TextureName
Else
newFill.PresetTextured msoTextureGreenMarble
End If
End With
End With
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.