Estou tentando criar uma macro muito pequena para alterar o formato (tamanho e fonte do texto) no Powerpoint.
Eu tentei usar esse código retirado de uma pergunta semelhante no StackOverflow . O código funciona, mas não quando o texto selecionado está em um gráfico de arte inteligente. Recebo uma mensagem de erro que dizThis Member can only be accessed for a single shape.
With ActiveWindow.Selection.TextRange.Font
.Name = "Courier New"
.Bold = msoTrue
End With
Alguma ideia?
Obrigado.
vba
fonts
microsoft-powerpoint
wizlog
fonte
fonte
1
Você receberá esse erro se mais de uma forma dentro do smartart estiver selecionada. Se você selecionar um de cada vez, seu código funcionará conforme o esperado. Você está tentando alterar todo o texto em uma peça de smartart ou em um subconjunto selecionado das formas?
Steve Rindsberg 13/03/19
Isso é estranho, porque selecionarei o texto de duas marcações ao mesmo tempo. Apenas um subconjunto selecionado.
Wizlog 13/0318
Então, você está selecionando várias linhas de texto dentro de uma das formas no smartart, em vez de selecionar várias formas?
Steve Rindsberg
Exatamente, é exatamente isso que estou fazendo.
Wizlog 15/0318
Estou atingindo becos sem saída aqui. O OM parece não suportar nenhuma maneira de acessar mais do que o texto na primeira forma.
Steve Rindsberg