Propriedade FillFormat.TextureName (PowerPoint)
Retorna o nome do arquivo de textura personalizado do preenchimento especificado. Somente leitura.
Sintaxe
expressão. TextureName
Expressão Uma variável que representa um objeto FillFormat .
Valor de retorno
Cadeia de caracteres
Comentários
Essa propriedade é somente leitura. Use o método UserTextured para definir o arquivo de textura para o preenchimento.
Exemplo
Esse exemplo adiciona uma elipse ao myDocument. Se a forma um em myDocument tiver um preenchimento de textura definido pelo usuário, a nova elipse terá o mesmo preenchimento que a forma um. Se a forma um tiver qualquer outro tipo de preenchimento, a nova elipse terá um preenchimento de mármore 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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.