Bonjour à tous,
J'essaie d'automatiser la mise en forme de plusieurs zones de textes sur une présentation PowerPoint.
J'aimerai pouvoir modifier la police, la couleur, mettre en gras etc.
Cependant je n'arrive pas à modifier le texte dans ma zone de texte via VBA.
Pour l'instant j'ai seulement réussi à changer la couleur du fond de la zone de texte avec le code suivant :
Merci par avance pour votre aide !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Sub Automatisation() With Windows(1).Selection.ShapeRange.Fill .Visible = msoFalse .ForeColor.RGB = RGB(255, 255, 255) End With End Sub
Partager